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ijjATENCION!!! 

POWER, SOFTWARE, S.A. 
Perseguira por todos 
los medios legates 
a su alcanee, cualquier 
tipo de piratena, 
comercializacion, 
importaciones 
o duplicados ilegales 
que sobre sus programas 
se practique. 
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Johny Alpha es un agente 
investigador destructor, 
un cazador de 
recompensas del future, J 
Johny [leva consigo I 
electrobengalas, f 
que deslumbraran I 
a sus enemsgos, I 
obligandoles a I 
dejar de disparar, I 
y bombas de tiempo. f 
Buena suertef £| 
en tu misionJ 
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BROAD STREET 

7 Personajes, 10 acordes 
perdidos, 15 horas, 
48 guardias de trafico, 
95 estaciones de metro, 
45.000 m 2 de Londres, 
7 mi Hones de I ond menses, 
943 pantalVas con 
trepidantes acetones. 



ASTRO BLASTER 



5 Olas de ataque, 15 niveles de dificuftad, fuego rapido, tormenta 

de meteorites, alienigenas mutantes, joystick, bombas asesinas, graficos a todo 

color en alta resolution, sonido, naves volantes, bolas de plasma, rayos laser. 



PURPLE TURTLES 

Basado en las legendarias tortugas purpuras. 

Un juego para Jos jovenes 
y demas personas que se hayan 
cansado de las palizas de los marcianitos. 



Recorte y envie este cupon a POWER, C/. Napoles, 98 r 1.°- 08013 BARCELONA, o Name al telefono (93) 232 24 61 

Oeseo recibir los |uegos que a continuacion especrko, campmmetiendome al pap del impone de los nnsmos. T I T U L0 



N ombre _ 
Direction . 
Telefono _ 



Firma; 



D Contrarreembclso D Adjunto Talon. Q GtroPosial. 
Deseo recibir informacmn de sus programas eft MSX \3 
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LASER ZONE 
GRIDRUNNER 
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ASTRO BLASTER 
QUINTIC WARRIOR 
PURPLE TURTLES 
STRONTIUM DOG 
STRONTIUM DOG 
FRIDGE FRENZY 
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EVIL CROWN 
EVIL CROWN 
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Strategy Games for the Action-Game Player 




_ Co mo miembro del Escuadron 

, Antiterrorista de Computadores 

IB9EE9BI (EAC), su mision encontrar y 
coger al infame Elvin, quien tiene 
; a la poblacion mundial como re- 
hen bajo la amenaza de aniquila- 

^ cion nuclear. Debe pasar por un 

pasillo a traves de habitaciones y 

_ ^ . — M ~ tuneles en su cuartel general ira- 

tando de evitar los robots protectores de Elvin, 

Debera correr mas o saltar por encima del siguiente ro- 
bot o jugar seguro y tomar el tiempo necesario para unir 
los codigos para desactivar los robots, encontrar a Elvin y 
pararle. 

P. V. P.: COMMODORE 64, 2.300 ptas. 
P. V P.: SPECTRUM 48 K, 2.300 ptas. 



Utilice su camara para fotografiar tantas pistas 
como sea posible para encontrar la contra sePia que le 
permitira penetrar en la habitacion de control de 
Elvin. 

Su mision: Salvar al mundo, jpero deprisa! 
Un /u go dor; control joystick o tcclado (solo 
SPECTRUM). 

/uLV Fabricado v distribuido bajo licencia por: 
/COMPUlOGICftL s a, 

Santa Cruz de Marcenado, 31 - 2801 5 Madrid - Telef 241 1063 
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Editorial 



LOS NUEVOS 1 28 



Estamos en el centro de la epoca mas ac- 
tiva del ano para el sector informatieo. A fi- 
nales del pasado mes tuvo lugar el Sonimag, 
certamen en el que los microordenadores to- 
man cada vez un mayor protagonismo. 

En ese mismo lugar fue presentado en so- 
ciedad el Spectrum 128 y tambien se pudo 
ver el Commodore 128. Todo el mundo anda 
expectante con los 128 Kbytes de RAM, 
pero tal vez el brillo esconda la verdadera 
realidad y los nuevos modelos no tengan una 
aceptacion tan rapida como pudiera supo- 
nerse. De todas formas, al usuario le gusta 
saber que su ordenador esta soportado por 
otro modelo con mayor memoria y ? sobre 
todo, compatible en software con el ante- 
rior. 

Pero tal vez estos modelos solamente sean 
un puente para los inquietos no dispuestos 
a esperar tranquilamente la llegada de la 



nueva generacion de maquinas con un ma- 
yor coeficiente de lo que los estadouniden- 
ses han dado en llamar «user friendly ness» f 
ordenadores de mane jo mas interactivo y 
sencillo por parte del usuario, como son los 
Amiga, de Commodore, y el 520 de Atari. 

El evento que sigue es en Madrid esta vez, 
el SIMO, a finales del presente mes. Es la 
puerta hacia los treinta dias en los que se 
vende del cuarenta al cincuenta por ciento 
de los microordenadores previstos para el 
ano. 

El proximo mes, INPUT ofrece un extra, 
consistente en un cuadernillo de programas 
listos para ser copiados y disfrutados. 

En algunos programas hemos hecho la ex- 
periencia piloto de sustituir los espacios y 
caracteres entrecomillados por su equivalen- 
te entre corchetes. Si el metodo os parece 
mas comodo no dudeis en hacernoslo saber. 



LOS MEJORES DE INPUT 

Hemos pensado que es interesante disponer de un ranking que El resultado de las votaciones sera publicado en cada numero 

ponga en claro, mes a mes, cuales son los programas preferidos de INPUT. 

de nuestros lectures, Para ello, es obligado preguntaros directamen- Entre los votantes sortearemos 10 cintas de los titulos que pidais 

te y tener asi el mejor termometro para conocer vuestras preferen- en vuestros cupones. 

cias. Podeis votar por cualquier programa aunque no haya sido co- Nota: No es preciso que corteis la revista, una copia hecha a 

mentado todavta en INPUT. maquina o una simple fotocopia sirven. 

Enviad vuestros votos a: LOS MEJORES DE INPUT Alberto Alcocer, 46 - 4.° B. 28016 Madrid 



ELIGE TUS PROGRAMAS 



Primer trtulo elegido L 



Tercer titulo elegido |_ 
Que ordenador tienes 
1. w Apellido l i i 



Fecha de nacimiento l_ 



Direccion I i i i 



Provincia t i i i 



J I L 



J I L 



_1 I L 



J L 



J I L 



J I L 



J 



Segundo titulo elegido 



J l_l J I L 



J L 



J L 



Programa que te gustaria conseguir 



_L Nombre I i i 



_L 2.° Apeilido 



J l I I I L 



_1 Tel6fono I 



J Localidad 



INPUT COMMODORE N,° 3 



ESTE PROGRAMA 
APARECE 
SIMULTANEAMENTE 
EN INGLATERRA 
Y ESPANA 



OTROS TITULOS 

GAMES DESIGNER MSX 

ANT ATTACK MSX 

ANT ATTACK CBM 64 

ANT ATTACK SPECTRUM 48 

SEE SAW CBM 64 

TRASHMAN CBM 64 

GATECRASHER SPECTRUM 48 

XADOM SPECTRUM 48 

FALL OF ROME SPECTRUM 48 

FALL OF ROME CBM 64 



or how to be in two minds about paranoia 





SCHIZOFRENIA 

o el desdoblamiento 
de personalidad 

Alphonse T. Nurd necesita ayuda. Su otro YO 

ha descubierto el sentido de independencia. 

Si pueden descubrir los secretos 

de lo$ separadores sub-atomicos de particulas 

y limpiar ascensores, este es tu juego* 

El rompecabezas de una vida... o dos. 



DSTRIBUIDO EN EXCLUSIVA EN ESPANA FOR REDIS, S. A. 
■c/. Regas, 13. 08006 BARCELONA. Tels. 218 21 23 - 218 22 46 




ACTUA LA JUST IC I A 

A nediados i)el pasado ies, 
el diario £1 Pais daba U 
noticja. En Alicante, La 
polina acababa de desactivar 
una estructurada organization 
de copia de software a nivel 
industrial. 

El jue; ordeno el ingreso 
inaediata en prision'de Iqs 
responsables de la 
fabricacirin-presuntaeente 
i legal. 

Sequn fuentes bi en 
intprrcatias, esta operacion no 
seria f&as que la punta del 
iceSerg A* una operacion $as 
basta, aun sin concluir. 





MADE IN SPAIN 

Siguiendo la pauta que en su 
dia imtiase lndestMP , la 
firaa Idealoqic ha decidido 
fabritar sus propios 
joysticks a un pretio 
cofiipetitivo (1.990 pts.l, por 
la ausencia de tasas 
arancelarias. 

Construido integrasente en 
plastico, el conettor situado 
al otro extremo del cable es 
el cUsico estandar T, 
directaaente enchufable a los 
sorts de Ids Confltodore . 




NUEVA ASOCIACION 

LJn grupo foriado por nueve 
etpresas cataianas de 
distribution de software ha 
ereado una asotiacion 
pro-f esional destinada a 
proteger los intereses 
propios, asi come los del 
consuiidor, segun reza su 
declaration de principios* 
Las prUeras firias que 
ficuran en la lista son: Ate 
Software , Coapanyia SeneraTde 
Software , Ciaex hlectronica. 
Dimension Kea . Frpies oft, 
Idealoqi c . Software tenter , 
Scanner Software y fentafcatic. 



PIE PARA IMPRESORA 




Una ingeniosa idea resuelve 
el problen'a de espacio para 
el panel. La eapresa First 
itiporia este soporte de Ian 
Corp 



GUI A DE SOFTWARE 

I— a General it at de Catalunva, 
por iedio del CenTro Divulqadqr 
de la Inforeatica . ha protiucido 
un catalogc-guia de 92 pSginas, 
dende aparece una lista 
exhaustiva de prograaas de 
aplitacion protesiORal, por 
sectores de u t i 1 1 dad y la 
referenda del proveeoor, 
Asisisroa se reflejan los 
sisters operatives bajo los 
que han sido desarrollados. 
En el directorio de eapresas 
aparece un dato interesante: la 
persona de tontacto. 




ACGLADE, UN PASO ADELANTE 



Ell Coaflodore 64 dispone de 
unas cap aci (fades graficas aun 
por descubrir. Son los 
prograsadores de elite quienes 
saben obtener el mayor provecho 
de eilas, en base a su 
experiencia acuimlada. Este es 
el caso de la nueva firna 
aaareciana Acolade , foraada con 
prograiadores precedents de la 
siitua Epyx . 





catcher asi coisd el lanzanriento 
de la pelota. H otro sirve 
para batear » 1 siguiente titulo 
que Uazaran se encuadra en las 
aventuras de naves espatiales. 
Un desafic en la calle 
principal de un poblado del 
iejano oeste es el tema elegido 
para coapletar la priaera terna 



de prograaas. 
La fir a 



La calidad de los juegos que ba 
presentado es tan depurada que 
les personajes ^rotagonistas 
dan una sensation de realidad 
proxiia a los dibujos anii&ados. 
El priser juego que ban puesto 
en circulation tiene que ver 
directaaente con la sociedad 
aeericana. Es un partido de 
Baseball, en el que tada 
jugador es controlado por los 
joysticks. Con uno se deteriaina 
la posicitfn del guante del 



ma Coftpuloqital sera la 
encargada de distnbuir este 
$o1t*&re en nuestro pais. 




6 INPUT 



C-64 - Spectrum - Amstrad 




1 



1 



iSimulacion de vuelo tri I 
Idlmensiona) (it- rombatef 
jaereo y ataque al suelo. 



Estas en la cabin a del caza que seria el sue no 
de cualquier piloto, pero desde luego eres un 
mal sueno para el pobre tipo que denes delante, confiado 
en una mision sin problemas. Calientale la tobera con tus 
laser y apartate mien Das estalla en una 
bola de fuegcx Rapidamente ponte en 
picado para caer sobre los blindados 







DRO SOFT 



Cint o nivelesj quince 
escenarios y capacidad 
dc juego estratt'gico. 



enemigos, coino la peste entre los cerdos. 
SKY FOX es el juego que mas rapidamente 
se esta vendiendo en toda la historia de Electronic ARTS. 
Posee la mas asombrosa animation de alta velocidad 
que hayas visto en tu ordenador. 
Ahora puede ser tuyo totalmente 
traducido al castellano. 



ELECTRONIC ARTS 



EN CASTELLANO 



CARACTERISTICAS: NACION ALIDAD: Federation galactica. FABRICANTE: TOBEY ASTRONAU TICS TIPO: Caza interceptor muhiproposito PROPUL 
SION AUXILIAR: Un generador aniigravitatorio a 6G MKI TRIPULACION: Un humano. ARMAMENTO: Dos canones laser de fuego c ontinue de 70 kilojulios 
10 tone la das de empuje. 5 misiles rastreadores de calor tipo PHOENIX 5 misiles guiados por radar tipo TYPHOON DEFENSA: — 2 umdades deflectoras WCRC 
AYUDAS ELECTRON ICAS: Radar SCANNER de largo y corto alcance conectable al piloto automatico. VELOCIDAD EN ATMOSFERA: — 3,000 MPH 
(Mach IV a 35.000 pies). 

Editado por DRO SOFT Fundadores, 3 - 28028 Madrid. 



EL BUZON DE INPUT 




Por mucha information que he- 
mos buscado, no hemos encontra- 
do nada y lo que hay esta muy mal 
explicado. Estos son los dos tipos 
de duda: 

La primera es como imprimir pi- 
xels en la pantalla, o sea, que PO- 
KES se deben utilizar para impri- 
mir! os en diferentes puntos de la 
pantalla y de distintos colores, para 
asi formar, por ejemplo, un dibujo 
hecho con pixels. 

La segunda es como utilizar el 
port del usuario como entrada de 
senal, es decir, hacer que una sehal 
entre en el port del usuario, envian- 
do la senal al interior del ordena- 
dor por medio del chip CIA. Y tarn- 
bien como se utiliza la salida de Au- 
dio/Video para introducir serial de 
audio en el 64. 

J. M. Folch. SabadelL 

El 64, como todos los orden a do- 
res, dispone de un area de memo- 
ria cuyas direcciones estan di recta - 
mente relacionadas con las posicio- 
nes de los distintos puntos (pixels) 
de la pantalla. Este ordenador tiene 
un formato de 200 por 320 puntos 
o f lo que es lo mismo, 64.000 pun- 
tos. Cada uno de ellos pueden ser 
visible o invisible, encargandose de 
ello un bit especifico (de ahf el ca- 
lif icativo bit-mapped! La informa- 
tion depositada en la memoria se 
agrupa en forma de bytes (8 bits), 
por lo que la cantidad de memoria 
requerida en este caso es de 8000 
bytes. 

La organization de la memoria 
utilizada por la pantalla queda para 
un futuro articulo, pero de momen- 



to podemos trabajar con la siguien- 
te formula: 

Direction a POKEar = 8192 + 
INT(Y/8)*320 4- (Y1 AND 7) + 
INT(X/8)*8 

Siendo Y un numero comprendi- 
do entre y 24 (el numero maximo 
de Ifneas de texto presentes en la 
pantalla). Y1 esta comprendido en- 
tre y 7 (la Ifnea seleccionada den- 
tro del bloque que la contiene) y X 
es un numero entre Oy 39 (numero 
maximo de caracteres por tinea). 
Una vez obtenida la direction, tene- 
mos acceso a 8 pixels consecuti- 
vos. Si POKE am os un 1 se encien- 
de el primer pixel, con 2 el segun- 
do, un 4 ilumina al tercero, 8 el 
cuarto, 16 el quinto, 32 el sexto, 64 
el septimo y 128 el octavo. La suma 
de varias de estas cantidades acti- 
va simultaneamente a los pixels co~ 
rrespondientes. 

Esta agrupacion de 24 por 40 «su- 
perpixels» de 8 por 8 pixels obede- 
ce a una estrecha relation entre las 
pantallas de texto y alta resolution. 

Cuando POKEamos una de estas 
direcciones no conseguimos ver 
nada, a menos que tecleemos: 

POKE 53265, PEEK (53265) OR 32: 
POKE 53272, PEEK (53272) OR 8 

que nos pone en modo grafico de 
alta resolution. 

El color es otra cuestion. Aquf no 
podemos dotar al pixel de un color 
independiente de sus adyacentes. 
Vuelve a surgir la organization de 
25 por 40. Cada una de las agrupa- 
ciones de 8 por 8 puede disponer 
de un color de primer piano y otro 
de fondo. El bit «iluminado» recibe 
el color de primer piano y el «apa- 
gado» el de fondo. 

Las direcciones de memoria 
comprendidas entre 1024 y 2023 al- 
macenan la information del color. 
Todos estos bytes se pueden divi- 
dir en dos (nybbles). Los cuatro bits 
de menor peso (0 al 4) definen el 
color de fondo con 16 posibilidades 
distintas. Los restantes hacen lo 
mismo, pero con el color de primer 
piano. 

La Entrada/Salida de senates a 



traves del chip CIA proporciona 
material para escribir un nutrido ar- 
ticulo, el cual no rechazamos pre- 
parar. 

En cuanto a la entrada de senal 
por el conector de AudioA/ideo ha- 
cia el chip SID es factible, pero hay 
que manejarlo con extremo cuida- 
do, pues podrfamos dahar al orde- 
nador. Igualmente, la manipulation 
de esta senal es el tema de un arti- 
culo que estamos elaborando. 

El programa «Asi lo oye tu orde- 
nador^ de la pag. 12 del N.° 1, no 
me funciona. Una vez puesto el Si- 
mon's BASIC y tecleando el listado, 
pongo RUN y el ordenador me con- 
testa con un SINTAX ERROR en la 
Ifnea 30. Si echais un vistazo a la li- 
nea en cuestion vereis que es SYS 
832. Decidme que debo hacer, pues 
estoy desconcertado. 

A. A. Blanes. 

En principio, no existe ninguna 
razon aparente para que SYS 832 
devuelva un mensaje de error de 
sintaxis. Este comando hace que 
comience a ejecutarse una rutina 
en codigo maquina, que en este 
caso comienza en la direction de 
memoria 832, a parti r de la cual he- 
mos cargado algo de nuestro pro- 
grama, empleando el bucle con 
READ, POKE y los DATAs. 

El programa, vuelto a repasar, no 
presenta errata alguna. Intenta ha- 
cer lo siguiente: Borra la tinea 30, 
ejecuta el resto del programa y es- 
cribe directamente SYS 832. 

Por otro lado, comprueba que 
has seguido la secuencia de traba- 
jo correcta. Primero has de enchu- 
far el cartucho del Simon's BASIC, 
conectando despues la alimenta- 
tion al ordenador. A continuation 
teclea el programa y ejecutalo. Si 
por cualquier circunstancia no hu- 
bieras puesto previamente el cartu- 
cho, es normal que aparezcan men- 
sajes de error. Igualmente, si hubie- 
ras cargado el programa en cinta o 
disco y lo vuelves a cargar en el or- 
denador sin el cartucho, vuelven a 
surgir los problemas de sintaxis. 



8 INPUT 




Al vofante de lu coche atraviesas 25 
ciudades. Seleccionas la ruta, manio- 
bras a traves del trafico... Todo un 
reto de conduccion autamo- 
vfitstica. C.A. 




Recorre un planeta en ties dimensio : 
nes a la busqueda de tus compafieros, 
mientras e! enemigo te persigue 



C.SA 



NuncafueAladjnotangenerosamente 
premiado par tos genios, 
Vuele sobre una increible affombra 
magica en Ires dimensiones. 

CAffl. 



Compfeja aventura donde los jugado- 
res deben buscar a traves de las (life- 
rentes pistas y problemas como re- 
soJverel misterio. 



y sus clasicos: GHOSTBUSTER. 



C.SAM. 



DECATHLON DE ACTIVISIQN. RIVER RAID, iffl fc 
CE SHUTTLE. A DESIGNER PENCIL. A etc. 



Disponibles para: 

COMMODORE C 
SPECTRUM S 
AMSTRAD A 
MSX M 



EN TIEN DAS ESPECIALIZADAS Y GRANDES ALMACENES, 



O DIRECTAMENTE 

POR CORREO O TELEFONO A: 



Distribuido por: 

PROEIN, S.A. 

Velazquez, 10 - 28001 Madrid 
Tels. 91/276 22 08/09 



EL BUZON DE INPUT 



En un articulo de la revista nume- 
ro 1, ccCuidado de cintas y disket- 
tes^, dicen que es conveniente ha- 
cer copias de seguridad por impre- 
vistos accidentes. Sin querer entrar 
en la polemica, me pr eg unto si es 
ser «pirata» el intentar hacer una 
copia de un programa comercial, 
porque no debe de hacer mucha 
gracia el gasfarse una cierta canti- 
dad de dinero (a veces bastante) y 
que por un accidente se te fastidie 
el programa, con la consiguiente 
perdida de dinero. Otra cosa muy 
diferente es hacer negocio con ello, 
pero piensen que un programa pi- 
rateado te cuesta un 10% (diez) del 
valor real. 

Mi intencion no es criticar esto r 
ni pedir que bajen los precios, sino 
una solution para que no me vuel- 
va a pasar otro accidente... , tampo- 
co he querido defender a los pira- 
tas, aunque no niego que es suges- 
tivo tener el mejor juego por muy 
poco dinero. 

Javier Casado. Mostoles (Madrid) 

No es nuestra mision determinar 
si se le puede adjudicar a u no el ca- 
lif icativo de pirata por hacer tal tipo 
de copias, pero desde luego con 
toda seguridad podemos afirmar 
que se trata de algo ilegal, por 
cuanto se danan los intereses de 



autores, firmas comercializadoras, 
canales de distribution, etc. 

Estamos de acuerdo con que es 
una triste gracia que en un momen- 
to dado se nos deteriore un progra- 
ma. Ahora bien, si procede de un 
distribuidor serio, este no pondra el 
menor impedimento para facilitar- 
nos una copia nueva a la entrega 
de la defectuosa, bien directamen- 
te o (en algunos casos) a t raves del 
comercio que lo vendio. Esta afir- 
macion es real puesto que hemos 
tornado la precaution de contras- 
tarla con algunos importadores es- 
paholes. Al fin y al cabo, cuando se 
compra un programa legal mente 
es lo menos que se puede pedir. 
Esto es sin duda algo que no pue- 
de garantizarse con los programas 
de procedencia dudosa. 

Hacer copias ilegales puede ter- 
minar siendo perjudicial para to- 
dos. Veamos como. 

Indudablemente la aparicion de 
nuevos tftulos, cada vez mejores y 
mas sugestivos, tiene una impor- 
tante motivation de indole econo- 
mica. En muchos casos el autor 
suele ser aiguien tan anonimo 
como cualquiera de nosotros, 
quien despues de pasar cantidad 
de horas frente al teclado decide 
vender a una casa de software el 
fruto de su imagination. En otros 
casos el programa es desarrollado 



por el personal de plantilla de estas 
firmas. La aparicion de copias ile- 
gales merma en gran manera la 
creation de nuevos tftulos, debido 
a la minimization del aliciente eco- 
nomico. 

En gran medida, esta es una de 
las principales razones para que no 
se desarrolle software de alta cali- 
dad en nuestro pats. iCuantos de 
nuestros lectores estanais d i spues- 
tos a trabajar durante meses en un 
programa del que despues se ven- 
denan solamente unas decenas de 
unidades, apareciendo a renglon 
seguido miles de copias ilegales? 
Afortunadamente para nosotros, ei 
mercado angiosajon tiene mayores 
dimensiones y menos «piratas» o, 
al menos, ellos siguen apostando 
(por el momento). 




ORDEN ADORES PERSON ALES 



• Commodore 64 y todos sus accesorios 
con interesantes, 

«SUPEROFERTAS» 

VEN A CONSULTARNOS 

Ademas * Atari 130 x E 128K 

• Amstrad 6128 12SK 

• Spectrum 128 y QL 

— SOTWARE PARA TOD AS LAS MARCAS 

— CURSGS DE BASIC 

— GRAN SURTIDO EN L1BROS Y REVISTAS 

Francisco Silvela, 19 
TeUfono 401 07 27. 28028 MADRID 



NO OLVIDES 

TU E JEMPLAR DE INPUT 
DE DICIEMBRE 

que te ofrecera ademas 
de las secciones habituates 
un cuadernillo especial con 

programas estupendos. 



CLUB de SOFT de ESPANA 



CBM 64 



tCOMO PUEDES HACERTE SOCIO 
DEL CLUB DE SOFT DE ESPANA? 

— Solo tendras que abonar 1.000 ptas. como cuota UNICA 
de inscrlpcion. 

— Como regalo de Bienvenida a nuestro Club de Soft de 
Espana, recibiras completamente gratis UN MARAVILLO- 
SO JOYSTICK. 

— Pertenecer al Club no te obliga nunca a comprar ni pagar 
cuotas posteriores. 




iHazte socio del Club de Soft de Espana! 
Tendras multitud de ventajas... 

— Recibiras puntual informacion de las novedades 
de soft que haya en el mercado. 

Te enviaremos un catalogo bimensual de pro- 
gramas para Commodore 64. 

— Podras adquirir en el Club, programas de nues- 
tros catalogos, con un 30 % de descuento sobre 
su precio en el mercado. 

— Obtendras descuentos de hasta un 20 % sobre 
hardware. 

Si ya eres socio del Club y deseas acogerte 
a este regalo, puedes hacerlo contra reem- 
bolso de 1.000 ptas., pero no olvides decirnos 
tu numero de socio. 



CARACTERISTICAS 
DEL JOYSTICK 

7^ 3 botones de disparo, dos en la 
base y uno en la palanca, 

if Conexion directa con COMMO- 
DORE, No necesita interface. 

& RESiSTENTE, FLEXIBLE, SENSIBLE. 

i% Precio en el mercado: 1.900 ptas. 




Mas de 5.000 socios 
en toda Espana, 
ya se benefician 
de las ventajas de 
nuestro CLUB. 



DIFUSION POR AM 1ST AD 

Habla a tus amigos de las enormes ventajas que 
supone pertenecer al CLUB DE SOFT DE ESPANA. 
Si junto con tu inscripcidn se inscriben dos ami- 
gos tuyos por tu recomendacion, te regalamos un 
programa de juegos, y ellos recibiran Igualmente 
el joystick como regalo de bienvenida. 




CUPON DE INSCRIPCION 
AL CLUB DE SOFT DE ESPANA 

Apdo. 52086 ■ Eraso, 13 ■ Tel. 246 10 94 - 28028 MADRID 



Nombre 

Direccion . 



Ciudad . 



. G. P. 



. Tel. . 



Deseo pertenecer al CLUB DE SOFT DE ESPAnA. Ruego me envfen como 
regalo de bienvenida al CLUB ei programa 
N.o de socio Firma 

El CLUB DE SOFT DE ESPAnA te enviara el programa soficitado, ei 
joystick, junto con un reembolso de 1.000 ptas. mas gastos de envlo, 
como cuota de inscripcion al Cfub. 

DIFUSION POR AMISTAD 

NOMBRE de un amigo 

Direccion . - 

Ciudad 



.C. P., 



Programa de regalo de bienvenida 



DIFUSION POR AMISTAD 

NOMBRE de un amigo _ 

Direcci6n , „ _ 

Ciudad C. P. 



.Tel. 



Programa de regalo de bienvenida 



.Tel. 



Firma 



Aplicaciones 



BUSCANDO 

EL MEJOR CAMINO 



■ 


EL CAMINO CRITICO 


■ 


AHORRO DE TIEMPO 


■ 


LA PLANIFICACION DE 


UN PROYECTO 


■ 


SUCESOS Y ACTIVIDADES 



Si estas intentando organizar un 
proyecto de cualquier clase, ya se tra- 
te del mantenimiento de tu coche o de 
comprarte una casa, este programa te 
ayudara a planificarlo y a ahorrar 
tiempo. 

^Alguna vez te has encontrado pa- 
rado a la mitad de un trabajo, como, 
por ejemplo, cuando decoraban tu 
cuarto de estar y te has dado cuenta 
de repente que si hubieras planeado 
las cosas adecuadamente no tendrfas 
que sentarte a esperar que se seque el 
yeso antes de empezar a pintar? O a 
lo mejor al arreglar tu coche te has 
encontrado que si lo hubieras pensa- 
do bien antes, habrfas tornado la pre- 
caution de sustituir el interruptor de 
la luz de los frenos antes de poner el 
cilindro bomba, con lo cual ahora no 
tendnas que volver a extraerlo. 

Cualquier actividad compleja nece- 
sita de una cierta planificacion, pero a 
veces parece ser necesario hacer tan- 
tas cosas, todas con una duration dis- 
tinta, y dependiendo ademas de que 
las actividades anteriores se hayan 
completado con exito, que resulta ca- 



si imposible hacer lo adecuado en el 
momento correcto. Lo normal es que 
a toda actividad le corresponda un 
instante de tiempo muy bien definido 
en el que ha de terminal*. 

EL CAMINO CRITICO 

Si examinas el tiempo requerido 
por cada actividad, encontraras siem- 
pre que hay una cadena de activida- 
des que determina el tiempo total re- 
querido por el proyecto completo. A 
esta cadena de sucesos se le llama ca- 
mino critico, y cualquier retraso o 
adelanto en esta cadena alterara la fe- 
cha final de termination del proyecto. 
Es posible que existan otras activida- 
des en las que un retraso no afecte a 
la duration total del proyecto. El de- 
sarrollo de estas ideas no es tarea fa- 
cil si tienes que dibujar a mano el ca- 
mino critico. Pero con ayuda de tu 
ordenador y del programa que damos 
a continuation, el analisis de la mejor 
situation posible resulta mucho mas 
sencillo. El programa te permite 



construir una base de datos que con- 
tiene todas las actividades que requie- 
re un programa particular, asi como 
la duration de las mismas (o un valor 
estimado si no se conocen) y el orden 
en que han de ser ejecutadas. A con- 
tinuation calcula el camino critico y 
te da la holgura temporal disponible 
en las actividades no criticas, de for- 
ma que sepas si tienes alguna tardan- 
za y hasta que punto te puedes demo- 
rar en cada una sin extender la dura- 
tion total del proyecto. 

El programa tiene dos partes. La 
primera, que es la que acompana a 
este articulo, establece una base de 
datos de todas las actividades, mien- 
tras que la segunda, que veremos la 
proxima vez, calcula el camino critico 
para que puedas decidir la forma mas 
rapida y eficiente de realizar tu 
proyecto. 

AHORRO DE TIEMPO 

Como permite obtener un camino 
critico, esta tecnica de programacion 
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SUPERNOVEDADES 



R 



DIGITAL. 
INTEGRATION ( 



La emocion de la veloci- 
dad te la trae Digital In- 
tegration en Speed King. 
Fabulosa carrera de mo- 
tos con posibilidad de 
elegir circuito, motocicle- 
ta de seis marchas... 



SPEED KING 

2.600 pts. 



C64 



Diviertete con ULTIMATE y las 
aventuras de Sir Arthur Pen dra- 
gon en The Staff of Karnath, 
Entombed y con la supernove- 
dad BLACKWYCHE. 




Santa Cruz de Marcenado, 31 
28015 MADRID 
Telefs. (91) 248 82 13 
(91) 242 50 59 



COMBAT & FLIGHT SIMULATOR 




Fantastico simulador de 
vuelo con despegue ver- 
tical desde un portavio- 
nes, con el que podra 
mantener una batalla con 
los aviones enemigos, ha- 
cer maniobras, ensayar 
vuelo. . . 

JUMP JET * C64 y 
AMSTRAD 

2.895 pts. 




Si deseas recibir mas informacion y propaganda de nuestros programas y de nuestras 
interesantes ofertas, por favor, rellena y envianos este cupon. 

Nombre . Edad 

Direccion • - 

Localidad-Provincia . • . - - 

Ordenador Programas favoritos 



se Uama a veces Metodo del Camino 
Critico o CPM (Critical Path Method) 
o Analisis del Camino Critico, CPA 
(Critical Path Analysis). Su otro nom- 
bre es PERT (Program Evaluation 
and Review Technique), que hace re- 
ferenda al metodo de planificacion 
por medio de redes. Estas tecnicas se 
desarrollaron al principio de la deca- 
da de los sesenta, siendo utilizadas en 
los programas espaciales de la NASA, 
Un ejemplo muy conocido fue el aho- 
rro de tiempo que se obtuvo durante 
el programa de misiles Polaris, en los 
que el tiempo real transcurrido para 
obtener determinados resultados se 
redujo en un factor de cinco, Actual- 
mente, los programas PERT se utili- 
zan ampliamente en los negocios y la 
industria, para aumentar la eficacia 
en todo tipo de proyectos. Por eso, si 
tienes un pequeno negocio (o incluso 
uno grande) este, programa te resul- 
tara ideal. 



PLANIFICACION DE UN 
PROYECTO 

Pero el uso del PERT no esta limi- 
tado al mundo de los negocios; cual- 



quier proyecto, por pequeno que sea, 
puede ser evaluado con este progra- 
ma. Realmente, el programa es util, 
aunque estes haciendo algo mas com- 
plicado que pintar una habitacion o 
arreglar un coche. Un proyecto que 
much a gente ha de realizar es la com- 
pra o venta de una casa, lo que supo- 
ne coordinar muchas cosas diferentes, 
con frecuencia con una fecha limite 
muy estricta. La figura muestra un 
posible diagrama PERT para la com- 
pra de una casa. Los rirculos encie- 
rran los Uamados sucesos. Son los es- 
tados que hay entre las diversas acti- 
vidades y en si mismos no consumen 
tiempo. Delimitan el principio o el fi- 
nal de una actividad. Las actividades 
se senalan junto a las lineas que unen 
los sucesos, asf como una estimacion 
del tiempo requerido por cada una. 
En el est ado actual, muchas activi- 
dades son dudosas, y ademas habras 
notado que hay muchos cruzamientos 
de Kneas. Por eso, aunque toda la in- 
formacion este alii, es dificil ver exac- 
tamente cuales son las cosas impor- 
tantes que hay que hacer rapidamente 
y si resulta posible o no hacer todo el 
trabajo en el tiempo permitido. 



Las ventajas de utilizar este progra- 
ma son enormes. Dispondras de un 
listado claro de todas las actividades, 
que, ademas, podras actualizar en 
cualquier momento. Entre toda la 
masa de informacion podras identifi- 
car el camino critico y controlarlo de 
cerca, pudiendo ejercer las acciones 
oportunas en cuanto se produzcan re- 
trasos. Tambien puede ser que descu- 
bras que hace falta replantear algunas 
actividades. 

La proxima vez veremos como se 
introduce la informacion en el progra- 
ma, Mientras tanto, teclea la primera 
parte y guardala, dejandola lista para 
anadirle la segunda parte el mes que 
viene, 

I para Cornmodore-64 

5 POKE 53280,1 :P0KE53281,1 
10 FA=0:MH=212:G0SUB12:CK= 

FA:GOT050 
12 CLS$="a":CM$=",":ZZ=32766 

:MA=100:ME=100:QT$=CHR$ 




14 INPUT 



Aplicaciones 



(34) :TR=-1 :PRINTCL$ 
14 P$="ESCRIBElj":A$= 

"ACTIVIDAD" 
16 DIMW$(5) :W$(1) = "N0lJ"+AS+ 

□"SUCESO PRECEDENTS": W$ 

(2>="N0 PUEDES USAR TANTO" 
18 W$C3)="N0 PUEDES EMPLEAR 

ESTE NUMER0":W$(4)=P$+ 

" TEXTO PARA ESTA □ " 
20 W$(5)=A$+"D SE REFIERE A 

UN SUCESO NO DEFINIDO" 
22 DEFFNA(X)=-X*<X<0) :DEF 

FNZ(X)=-X*(X>0) 
28 DIMA%(MA),G%(MA),U%(256) 
30 DIMW(MA) :DEFFNW(X)=-ABS 

(X)*(X<=1)-ABS(2-X)*(X>1) 
32 DEFFNX(X)=X*(2.37572+X*X* 

(15.9402-X*X*(184.744- 

X*X*688.472)))/1 .20667 
40 DIM E%(ME) 

44 DIM S%<MH),F%(MH),V%(MH), 
T(MH),N(MH) ,U$(MH),Y(MH), 
Z(MH) 

46 DIM P(MH),Q(MH) 



48 DEFFNU(XX)=TR*U%(ABS(XX) 
-CXX=0))*(XX>0) :RETURN 
:LIST: 
50 PRINT CLS$TAB(10) 
MENU 

53 PRINT"!! 1=DEFINEB"A$: 
PRINT"!! 2=B0RRARH";A$ 

55 PRINT"!! 3=DEFINE SUCESO": 
PRINT"!! 4=B0RRA SUCESO" 

60 PRINT"!! 5=GUARDA LOS 
DATOS" : PRINT" U 6=CARGA 
LOS DATOS" 

61 PRINT"!! 7=B0RRA FICHEROS 
DEL DISC0":PRINT"!I8= 
MUESTRA DETALLES" 

62 PRINT"!! 9=REEMPEZAR" 

63 PRINT"10=C0MPRUEBA Y 
ORDENA LA RED" 

64 PRINT"11=CALCULAR LOS 
TIEMPOS MEDIOS" 

65 PRINT"12=CALCULAR CON 
INCERTIDUMBRE":PRINT"13= 
SALIDA A3"; 

66 IF KK$="S" THEN PRINT 



" d IMPRESORA H/PANTALLA" 

67 IF KK$<>"S"THEN PRINT 
"IMPRESORA/ a PANTALLA S " 

68 PRINT"14=SALIDA PROGRAMA 

69 T=0: INPUT" B!l!l!l QUE 
OPCION";T 

70 IF T=1 4THEN INPUT "ESTAS 
SEGURO(S/N)";AN$:IF AN$= 
"S"THEN SYS 58648:END 

71 IF T=13 OR T=14 THEN 100 

72 IF T=9 THEN 900 

73 IFT<1 OR T>13 THEN PRINT 
"■Hid 0PCION"[~];T;"N0 
ENTENDIDA":GOTO 114 

74 IF T>10 AND NOT(CK) THEN 
PRINT" IHia COMPRUEBA 
PRIMERO LOS DATOS": 
GOTO 114 

76 IF AA=0 AND(T>7 OR T=5) 
THEN PRINT" ■ W ¥fl 5? NO 

puedo-no hay; : "+a$: 

GOTO 114 
80 IF T>7 THEN 100 
82 IF T=6 THEN CLR:T=6 




INPUT 1 







Aplicaciones^ 





84 IFT>4THEN PRINT "□"PS; 

"II FICHERO":INPUT F$: 

GOTO 100 
86 F$=A$:IF T>2 THEN F$= 

"SUCESO" 
88 PRINT CL$"ESCRIBE EL 

NUMERO DEU ";F$: PRI-NT 

"0 CERO PARA SALIR" 
90 INPUT U :U =INT(U) : IFU=0 

THEN 50 
92 IF U <1 OR (U>ZZ)THEN 

PRINT W$ (3) :F0R DE =1 TO 

999:NEXT DE: GOTO 88 
94 IFT>2THEN U=-U 
96 GOSUB 450:CK=FA 
98 IF(T=2 0RT=4)AND(0=U%(X) 

OR ZZ<U%(X)) THEN PRINT 

"NUMERO NO UTILIZADO": 

G0T0114 

100 PRINT CL$:0N T GOSUB 120 
,200,300,400,500,600, 
700,800,900,1 000,2000, 
3000,960 

101 IF KK$="S" AND(T>7 AND 
T<1 2) THEN OPEN 3,4:CMD3 

105 IF KK$="S" AND<T>7 AND T 
<13)THEN PRINT#3:CL0SE 3 



110 IF T<5 THEN 86 
112 GOTO 50 

114 FOR T=1 TO 1000:NEXT T: 
GOTO 50 

120 IF 0<U%(X) AND ZZ>=U%(X) 

THEN GOSUB 942:G0SUB 932 

:G0T0 130 
122 IF(AA=MA)THEN PRINT W$ 

(2);F$:RETURN 
124 AA=AA+1 :A%(AA)=X:U%(X)=U 
130 PRINT W$(4);F$: INPUT U$ 

(X) :XA=X 
140 PRINT PS; "SUCESO INICIAL 

, SUCESO FINAL ":INPUT 

S,F:S=INT(S) :F=INTCF) 
142 IF S<1 OR S>ZZ OR F<1 OR 

F>ZZ THEN PRINT W$(3) : 

GOTO 140 
150 U=-S:GOSUB 450:IFU%(X)<0 

THEN 156 
152 IF EE=ME THEN PRINT W$ 

C2);"SUCES0S":G0T0 140 
154 G0SUB350 
156 S%(XA)=X 

160 U=-F:GOSUB450:IFU%(X)<0 

THEN 166 
162 IF EE=ME THEN PRINT W$ 




(2);"SUCESOS":G0T0 140 
164 GOSUB 350 
166 F%(XA)=X 

170 PRINTP$;"TIEMPO PROBABLE 
DE REALIZACION": INPUT 
T(XA) 

172 IF T(XA)<0 THEN PRINT 

"NO LO PUEDES HACER TAN 

RAPIDO":G0T0 170 
180 PRINTP$;"TIEMPO SEGURO 

AL 90%":PRINT"PARA SU 

REALIZACION":INPUT N(XA) 
182 IF NCXAXT(XA) THEN 

PRINT"ESTO DIFIERE DEL 

TIEMPO PROBABLE": 

GOTO 170 
190 RETURN 

200 F0RB=1 TO AA:IFA%(B)=X 

THEN A=B 
220 NEXTB:XX=A%CAA) :U%(X)=ZZ 

+1 :A%(A)=XX:AA=AA-1 : 

RETURN 

300 IF U%(X)<0 THEN PRINT 
M aSUCESOS":XP=U%(X) : 
GOSUB 950:PRINT U$(X): 
GOTO 330 

310 IF(EE=ME) THEN PRINT 
W$(2);F$: RETURN 

312 G0SUB350 

330 PRINTW$(4);F$: INPUT U$ 
(X) :S%(X)=0:RETURN 

350 EE=EE+1 :E%(EE)=X:S%(X)= 
-1 :F%(X)=0:U%(X)=U 

360 T(X)=0:N(X)=0:U$(X)="": 
RETURN 

400 FOR F=1 TO EE: IF E%(F)=X 

THEN E=F 
420 NEXT F:XX=E%(EE) : :U%(X)= 

ZZ+1 :E%(E) = XX:EE=EE-1 : 

RETURN 

450 Z=U-INT((U-1)/MH)*MH: 

Y=2:X=0 
460 IF X=0 THEN IF 0=U%(.1) 

OR ZZ+1=U%(Z) THEN X=Z 
470 IF U=U%(Z) THEN X=Z: 

RETURN 

480 IF Y=1 OR 0=U%(Z) THEN 
RETURN 

490 Z=Z+Y~MH*INT((Z+Y-1)/MH) 

:Y=Y+Y-MH*INT((Y+Y-1) 

/MH) : GOT0460 
500 OPEN 1,8,8,"0:"+F$+", 

SEQ,W":PRINT#1,MA;CH$; 

ME; CMS; MH; CM$; AA; CMS; EE; 

CMS; CK 
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510 IF CK THEN PRINT#1 ,SE; CMS; FE 
520 FOR A=1 TO AA: X=A% ( A) : PRINT#1 ,X; 

CM$U%(X) CM$S%(X) CM$F%(X) CM$T<X) 

CM$N(X)CM$; 
530 PRINT#1 ,G%(A) CM$;QT$;U$(X) ;QT$: 

NEXT A 

540 FOR E=1 TO EE: X=E%(E) :PRINT#1 ,X; CMS; 
U%(X);CM$;S%(X);CM$;F%(X);CM$T(X) 
CMSN(X) 

550 PRINT#1,QT$;U$(X);QT$:NEXT E 
560 FOR X=1 TO MH:IFU%(X)=ZZ+1 THEN 

PRINT#1,X 
570 NEXT X:PRINT#1,0 
580 CLOSE1 : RETURN 

600 OPEN 1 / 8,8,"0:"+F$+",SEQ,R":INPUT#1, 

MA,ME,MH,AA,EE,CK:G0SUB12 
610 IF CK THEN INPUT#1 ,SE,FE 
620 FOR A=1T0AA:INPUT#1,X,U%(X),S%(X), 

F%(X) ,T(X) ,N<X) ,G%(A) ,U$(X) 
625 A%(A)=X:NEXT A 

640 FOR E=1 TO EE: INPUT#1 ,X,U% (X) ,S% (X) , 
F%<X),TCX),N(X),U$(X) :E%(E)=X: 
NEXT E 

650 INPUT#1,X:IFX>0 THEN U%(X)=ZZ+1: 

GOTO 650 
660 CL0SE1 : RETURN 

700 0PEN1 5,8,1 5, "SO: "+F$: CL0SE1 5 : RETURN 
800 GOSUB 942 

810 FOR A=1 TO AA:X=A%(A) :GOSUB 932 
820 Y=Y+1-(LEN(U$(X))>12) :IF Y>20 AND 

<A>AA) THEN GOSUB 940: GOSUB 942 
830 NEXT A :GOSUB 936:PRINT " SUCESOS": 

PRINT: Y=3 

840 FOR E=1 TO EE:X=E%(E) :XP=U%(X) :GOSUB 

950:PRINT U$(X) 
850 Y=Y+1-(LEN(U$(X))>12) :IF Y>20 AND 

E<EE THEN GOSUB 940: GOSUB 946 
860 NEXT E:GOTO 936 

900 INPUT"sREINICIO EL PROGRAMA (S/N)"; 

AN$:IF AN$="N"THEN 50 
910 IF ANSO"S" THEN 900 
920 RUN 

932 XP=FNU(S%(X)) :GOSUB 950 :XP=FNU( F% 
(X)):GOSUB 950:XP=T(X) :GOSUB 950: 
XP=N(X) 

933 GOSUB 950:XP=ABS(U%(X)) :GOSUB 950 

935 PRINT: PRINT"TEXTO = ";U$(X) :RETURN 

936 IF KK$<>"'S" THEN PRINT" PULSA 
RETURN 

PARA CONTINUAR" 

937 GET FS:IF F$=""THEN 937 

938 IFF$OCHR$(13)THEN 937 

939 PRINT CLS$;:RETURN 

941 RETURN 

942 REM***CONTINUARA 



*HHFO, SI. 

SEKVIOOS DS iNFORMATTCA 




PROGRAMAS 
PROFESIONALES 

Cr COMMODORE 64 



128 




GESTION 
COMERCIAL 



Qe commodaj- 



PAQUETE INTEGRADQ DE FACTURA- 
CION Y CONTROL DE STOCKS 

Capacidades dB ficheros programables por eJ usuario 
[clientes, arciculos. proveedores}. - Control de entradas/ 
salidas de almacen. ■ Inventano permanent e inventano 
bajo rmnimos. - Gastson de reserva de pedidos. - Factu- 
racion y emision de recta. - Posibilidad de facturar arricu- 
los no existemes (facturacion directa), - Distintos Tipos 
de impuesios programables (ITE. 1VA}. - Ustado de emra- 
das/salidas de almacen. - Ustado de pedidos pendienres. 
diario de ventas, remesa bancaria. ■ Ustadas de ficheros 
con cabecera prctjramabte. ■ Listados con criterios de 
selection de fichas. - Emision de etiquetss. * Ccnexion 
con tratamiento de teitos (documentacton personalizada}. 



ESTRUCTURAS 

Caicuta porticos pianos de hormigtin armado. - Calcula Eos esfuerzos para las tres hipotesis 
venicales, vtento y sismo. - Armado total de vigas y pilares. - Cuadro de pesos de hierro. 

- Cuadro cubico de hormigon. * Ustado de todos los esfuenos en el armado. 

MEDICIONES Y PRESUPUESTOS 

Pfcgrama de mediciones y presupuestos de obra tatalmente programable por el usuario. 
Lisiado de mediciones y presupuesia por panidas. - PosibjEidad de ejuste automarjco de 
presupuesto. 

C0MTAB1U0AD 

Basada en et Plan Comable EspanaL - 300 o 1000 cuentas. - Contraparud3 automatica. 

- Estractos por pamalla o impresora. - Balances programables. - Grupos y 9. - Balance 
de situation y cuenta de explotacion programables. 

FACTURACION 

prcrjrama de facturacion directa. - Fichero de amculos y dientes, * Diarios de ventas. 
-Desojose de imptiestos. - Emision de recibos. ■ Vanas versiones. 

CONTROL DE STOCKS 

Ficheros de aniculos y proveedores, ■ Control de emrada-salida de almacen. - Actualization 
automatica. - Inventario permanent ■ Inventano bajo mtnimos. - Listadcs varios. 

CALCULOS ELECTRICOS 

Calculo de redes de alia tension. - Calcuios mecamcos y electros. - Calculo de redes en 
baja tension. - Electnftcacion de viviendas. ■ Informes completes para adjuntar a! proyecto. 

- Tratamiemo de textos incorporados. 



OTROS PROGRAMAS: 

— TRATAMIENTO DE TEXTOS EN ESPANQL 
— GENERADOR DE FICHEROS. 
— ESTADISTICA |5 paquetesj, etc. 



DESARROLLOS DE HARDWARE: 

— SISTEMA AULA (examenes tipo test]. 
— OEPAHTAMENTOS DE FORMACIGN, 
— AUTOESCUELAS. 



PIDA WQRMACIQN: Avda. Goya. 8 Telefono 22 69 74 
IDismbuidores exclusivamente per carta) 



50006-ZARAGOZA 



INPUT 17 




Vendo los siguientes cartuchos para C- 
64: Dragonsden, Futbol internacional, 
Sandra 64 mas su cassette con ejem- 
plos y manual de instmcciones, o cam- 
biaria por cartucho «Simon's Basic» u 
otros de utilidades como «L060», etc. 

Juan Jose Martinez Mayordomo. 

Carricola, 1, 2. 3 
Tels. 331 28 37 y 377 44 26. 

Valencia 46017. 



Vendo Commodore 16 mas Datassette 
mas manual en ingles y en castellano 
mas juegos. Poseo multiples revistas y 
libros. 

Preguntar por Javier. 
Tel. (91) 466 41 38. 



Compro Commodore-64 de segunda 
mano en buen estado; ofertas a: 

F. Javier Garcia Coves 
Calle 14, 6. 
Tel. (965) 16 47 26. 
Vistahermosa. 
03015 Alicante. 



Intercambio programas en disco o cin- 
ta. 

Luis Garcia Millan. 
Avda. Valladolid, 25. 
34004 Palencia. 



Cambio programas de Commodore-64. 

Pau Vaques Mora. 
Soledad, 104. 
Jgualada (Barcelona). 



eizoco 



Vendo ordenador Commodore CBM- 
4032 y unidad doble de discos Com- 
modore CBM-8050, todo ello en perfec- 
to estado, con mas de 100 programas, 
como Bases de Datos, Untilidades, 
Contabilidad y Juegos, asf como todos 
los cables necesarios para su interco- 
nexion. Todo por 280.000 ptas. 
(400.000 de nuevo). 

Jose Bermell Tarazona. 
Plus Ultra, 23, 3. ? 
Tel. (96) 334 03 40 (7 tarde en adelan- 

te). 

46006 Valencia. 



Cambio Spectrum Plus 64 K, mas inter- 
face Kemson programable, 40 juegos 
(Oue, On ohs Profanaicon, etc.), cables, 
dos manuales y las revistas, por Com- 
modore CBM-64, manuales y cables. 
Pagaremos diferencia. 

Tel. (91) 706 02 99. 



Cambio programas C-64, Poseo mas 
de 600 titulos (cassette). 

Jordi Balaguer. 
Principe de Viana, 84, 3, D 
25008 Lerida. 



Desearia intercambiar en cinta o en 
disco todo tipo de programas para el 
C-64. 

Xavier Rodriguez i Sagarra. 
Pin i Soler, 6, 1.° B. 
Tel. (977) 21 92 03. 
43002 Tarragona. 



Cambio programas Vic-20. Memoria 
original y 8 K. 

Jose Luis Ripoll Bestard. 

Legionario Aleixo, 8, 3.° 
07011 Palma de Mallorca. 

(Baleares.) 



Vendo Vic-20 en perfecto estado por 
tan solo 15.000 ptas. Ademas regalo 
varios libros y programas. 

Ricardo Alba. 
Sumatra, Q-2. 
Tel. (952) 43 18 69. 
Ef Atabal (Malaga 29010). 



Club (C) LDA de Lerida. fntercambios a 
todo nivel con clubs y particulares so- 
bre C-64. 

Andreu Ibanez Perales, 
P.° de Ronda, 76, 3.°, 1„ B 
Lerida 25006. 



Intercambio programas, tengo unos 
300. 

Javier Hernandez Sole. 

E! Roser, 34. 
Tel. (977) 40 10 94. 
Mora la Nova (Tarragona). 



Desearia intercambiar programas en 
cinta para el Commodore-64. 

Jesus Valdecasa Fombellida. 

Lluch, 2, 4.°, 2. a 
08016 Barcelona. 



Vendo Vic-20 casi nuevo; incluyo Da- 
tassette, curso Basic completo y exten- 
so software (cintas y cartuchos). 

Joan Al 

Tel. (93) 798 66 29 (noches). 



Me interesaria por unos fibres donde 
se trata la tridimension aplicada a la 
microinformatica. Todo tipo de libros 
sobre el tema. Pagaria contra reembol- 
so las fotocopias o cambiana por 
otras. Si me pueden dar informacion 
sobre libros, tambien lo aceptaria. 

Juan Ramon Elias Moreno. 

Forjadores, 9. 
Sevilla 41008. 



Vendo Vic-20 en perfecto estado, por 
18.000 ptas. 

Manuel Monge Lopez, 
Pintor Lopez, 15 
Tel (964) 21 78 65. 
Castellon. 



Quiero formar un Qrupo de amigos del 
Commodore 64 en Majadahonda (Ma- 
drid). 

Eduardo Torras Planas. 

Beatriz de Silva, 2. 

Tel. (91) 638 53 26. 
Majadahonda (Madrid). 
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ACELERA TUS 
RUTINAS DE JUEGOS 
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El codigo maquina no es solo para 
el programador experimentado. Tu 
puedes empezar con el, recurriendo a 
rutinas cortas que aceleren tus juegos 
en BASIC, y divertirte mientras 
aprendes. 

La programacion en codigo maqui- 
na dista mucho de ser facil, al menos 
a simple vista. Para la mayon'a de los 
usuarios de ordenadores personales, 
el codigo maquina no es mas que un 
espantoso monton de numeros. 

La mejor manera de comenzar es 
meterse a fondo con algunas rutinas 
escritas en codigo maquina. Asf pue- 
des familiarizarte, desde el principio, 
con sus ventajas y con lo que puede 
ofrecer a tus programas. Es por ello 
que hemos decidido llevarte a traves 
de esos numeros misteriosos en este y 
en otros proximos artfculos, de tal 
manera que puedas ser capaz de desa- 
rrollar programas en codigo maquina 
por ti mismo. 

Los graficos que van en este articu- 
lo utilizan programas en BASIC para 
depositar las rutinas en codigo maqui- 
na en la memoria de tu ordenador. 
De esta manera puedes producir mo- 
vimientos mucho mas rapidos y con 



Figura I, 



mas apariencia de vida de Io que po- 
dn'as conseguir utilizando solamente 
el BASIC. 

La mejor manera de crear graficos 
similares a los de las figuras 1 y 2 es 
utilizar una de las caractensticas gra- 
ficas especiales del Commodore 64: 
los Sprites, el rey de los GDU. 

CREA EL TANQUE 

Este programa de Sprites cubre tres 
actividades: una rutina de inicializa- 
cion, una secuencia de control, que 
regula el movimiento del Sprite por la 
pantalla, y los datos utilizados para 
definir la forma del Sprite-tanque: 

10 FOR M=252 TO 253: FOR 

I=64*M TO 64*M+63:P0KE 

I,0: NEXT 
20 FOR I=64*M+21 TO 

64*M+56:READ A: POKE 

I ,A: NEXT: NEXT 
30 SC=53248:X3=24:X=24: 

Y3=157:Y=157 



40 POKE 2043,252: POKE 

2042,254: POKE SC 

+23,0 
50 POKE SC+29,0:POKE 

SC+42,12:P0KE SC 

+27,0 
90 J=0:R=0:POKE 

650,1 28: PRINT" □": POKE 

SC+21,8 
100 GET A$:IF A$=""THEN 180 
110 IF A$="Z" AND X3>24 

THEN X3=X3-12 
120 IF A$="X" AND X3<310 

THEN X3=X3+12 
130 IF A$="P" AND Y3>50 

THEN Y3=Y3-12 
140 IF A$="L" AND Y3<220 

THEN Y3=Y3+12 
180 IF X<X3 THEN X=X+3:P0KE 

2043,252 
190 IF X>X3 THEN X=X-3:P0KE 

2043,252 
200 IF Y<Y3 THEN Y=Y+3 
210 IF Y>Y3 THEN Y=Y-3 
220 XA=INT(X/256) :XB= 

X-XA*256 






INPUT 21 
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Figura 2. Esquema de la composition de la rana. 



230 POKE SC+6,XB:P0KE 

SC+7,Y 
240 POKE SC+16,4*(1 AND 

JA)+8*(1 AND XA) 
250 GOTO 100 
1000 DATA 0,1,192,0,63,224, 

255,255,254,0,255, 

254,1,255,224,0,0,0 
1010 DATA 63,255,255,127, 

255,255,255,255,255, 

122,235,174,48,65,6 
1020 DATA 6,102,100 
1030 DATA 3,128,0,7,252,0, 

127,255,255,127,255,0, 

7,255,128,0,0,0 
1040 DATA 255,255,252,255, 

255,254,255,255,255, 

117,215,94,96, 

130,12 
1050 DATA 38, 

102,96 



Si ahora ejecutas el programa 
(RUN), veras un tanque desplazarse 
por la pantalla, bajo las ordenes de 
las teclas Z y X, que lo mueven de 
izquierda a derecha, y P y L. que ha- 
cen lo propio de arriba a abajo. Para 
dete ner el program a se recurre a la 
tecla I RUN/STOP. | Advierte como el 
tanque cambia de forma cuando se al- 
tera la direction del movimicnto. 



ANADELE ACCION 



Hasta ahora solo has utilizado uno 
de los Sprites disponibles, pero puede 
crearse otro para dotarle de fuego al 
tanque. Este programa dispara 




proyectiles por la pantalla cuando 
pulsas la barra espaciadora: 

30 FOR M=254 TO 255: FOR 
I=64*M TO 64*M+62:P0KE 
I,0:NEXT 

40 M2=0:IF M=255 THEN M2=2 

50 FOR I=64*M+18 TO 
64*M+36 STEP 3: READ 
A: POKE I+M2,A:NEXT: 
NEXT 

80 POKE SC+23,0:POKE 

SC+29,0:POKE SC+41,1 
150 IF A$<>"D" THEN 180 
160 RT=(PEEK(2043)=253): 
X2=-360*RT : Y2=Y : J =X-24 
*RT-11 :P0KE 2042, 
254-RT 

170 POKE SC+21,12:G0SUB 260 
260 FOR T=J TO X2-4 

STEP(RT*2+1)*-20 
270 JA=INT(T/256) :JB= 

T-JA*256 
280 POKE SC+16,4*(1 AND 

JA)+8*(1 AND XA) 
290 POKE SC+4,JB:P0KE 

SC+5,Y 
300 FOR P=1 TO 

30 : NEXT : NEXT : RETURN 
1500 DATA 4,9,2,176,2,9,4 
1510 DATA 32,144,64,13,64, 

144,32 

Para guardar (SAVE) el programa 
de cara a futuras utilizaciones, teclea 
primero POKE 53269,0 (que limpia 
de Sprites la pantalla) y despues em- 
plea el SAVE normalmente utilizado 
en BASIC. 

CREACION DE LA RANA 

Intentemoslo ahora con la rana. El 
grafico de la misma aparece en la fi- 
gura 2, pero debe ser ligeramente al- 
terado para poder ser acomodado en 
un solo Sprite. Esto se hace quitando 
tres de las cuatro filas. El unico efec- 
to es que las piernas se acortan ligera- 
mente. 

Desconecta el or denador, o simple- 
mente teclea NEW [returnI antes de 



introducir este programa: 



10 FOR M=252 TO 253: FOR 
I=64*M TO 64*M+29:P0KE 
1,0: NEXT 
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20 FOR I=64*M+30+30* 
(M=253) TO 64*M+62 
:READ A: POKE I, A: NEXT 
:NEXT 

30 PRINT"U" 

40 SC=53248:X=24:Y=155: 
POKE 2043,252: POKE 
SC+7,Y:POKE 
SC+6,X:P0KE SC+ 
16,0 

50 POKE SC+23,0:POKE 
SC+42,5:POKE SC+21,8 

60 SC=53248:X=24:Y=155: 
POKE 2043,252: POKE 
SC+7,Y:P0KE SC+6,X: 
POKE SC+16,0:YR=0 

70 GET A$ 

80 IF Y>155 THEN POKE 

2043,252 
90 IF PEEK(2043)=253 THEN 

120 

100 IF A$<>"l l"THEN 
70 

110 POKE 2043,253 
:YR=7.5 



1020 DATA 127,64,0, 
254,32,0,248, 
156,0,127, 
192,0 




120 Y=Y-YR: YR= 
YR-.7 

130 X=X+4:IF X=296 THEN 
POKE 2043,252: FOR T=1 
TO 200: NEXT: GOTO 
60 

140 XA=INTCX/256) : 

XB=X-XA*256 
150 POKE SC+6,XB:P0KE 

SC+7,Y:P0KE SC+16,(1 

AND XA)*8:GOTO 

70 

1000 DATA 0,128,0,1,192,0, 

1,176,0 
1010 DATA 4,96,0,15,240,0, 

31,224,0,63,192,0 



INPUT 23 



Aplicaciones 



ADAPTA 

TUS GDU (y II) 



■ 


NUEVOS CONTROLES 


■ 


GDU INVERSOS 


■ 


GDU GIRATORIOS 


■ 


USO DE LOS GDU 


EN TUS PROGRAMAS 



^Falta algo en tu generador de 
GDU? A continuation te ofrecemos 
nuevas Imeas de programa que te 
abriran otros horizontes en el diseno 
de excitantes GDU. 

En este artfculo presentamos el 
resto de los programas del generador 
de caracteres. Las nuevas lineas de 
programa anaden varias mejoras, pa- 
ra que te resulte aun mas facil disenar 
tus propios caracteres graficos. Hay 
tambien una guia para utilizar los 
GDU definidos por ti, llamandolos 
desde otros programas. 



Las siguientes Imeas de programa 
anaden unas cuantas funciones nue- 
vas al generador de caracteres que 
publicamos en el numero de septiem- 
bre. Si guardaste el programa en cin- 
ta, puedes cargarlo de nuevo ahora 
con LOAD. Si no lo hiciste, teclealo 
incorporandole las siguientes lineas. 

v .l para Commodore- 64 

33 FOR Z=0 TO 7: POKE 
12288+Z,255:NEXT Z 
123 PRINT "BHHBSafelfelU Q" 

;:F0R Z=1 TO 31 : PRINT 



"B";:NEXT Z: PRINT "kl" 
125 PRINT 'illlliaiMa }M 

a i j aa □ ca i jh3 t jiia □ a a 
□laannanBanBanHai j 
□annan na am nam' ' 

128 PRINT "diltlfeO"; : FOR 

Z=1 TO 31 :PRINT 
"B";:NEXT Z:PRINT "Q" 
165 IF P=55 AND Y<7 THEN 
Y=Y+1 

210 IF P=4 THEN 1000 
220 IF P=5 THEN FL=1 :G0T0 
1100 

230 IF P=6 THEN FL=2:G0T0 
1100 




Aplicaciones 



240 IF P=3 THEN FL=3:G0T0 
1100 

245 IF P=51 THEN FL=4:G0T0 
1120 

260 IF P=49 THEN A=0:GOTO 
1230 

270 IF P=54 THEN 1300 
1000 FOR Z=0 TO 7: FOR ZZ=0 
TO 7 

1010 C1=1396+ZZ+Z*40: 

C2=PEEK(C1) 
1020 IF C2=207 THEN POKE 

CI ,230 
1030 IF C2=230 THEN POKE 

C1,207 
1040 NEXT ZZ,Z:GOTO 130 
1100 FOR Z=0 TO 7: FOR ZZ=0 

TO 7 

1110 C1=1396+ZZ+Z*40: 

C(Z,ZZ)=PEEK(C1) : NEXT 
ZZ,Z 

1120 FOR Z=0 TO 7:F0R ZZ=0 
TO 7 



1130 
1132 
1134 

1136 

1140 
1145 

1150 
1230 
1270 

1300 



1301 




IF FL=1 THEN POKE 

1399+ZZ+Z*40,CCZZ / 7-Z) 

IF FL=2 THEN POKE 

1399+ZZ+Z*40,CC7-ZZ,Z) 

IF FL=3 THEN POKE 

1399+C7-ZZ) 

+Z*40,C(Z,ZZ) 

IF FL=4 THEN POKE 

1399+ZZ+Z*40,207 

NEXT ZZ,Z 

IF FL=4 THEN A=0: GOTO 

1230 

GOTO 130 

PRINT "BBBBBBBBB" 

PRINT "a";SPC(24);Z+1 ; 

"Hnnnniiniiii";T 

PRINT "BBBBB"; 
TAB (9) ; "(D)ATOS 
COARACTERES?": FOR Z=1 
TO 25: NEXT Z 
PRINT "SBHHB"; 
TAB (9) 

GET A$:IF A$<>"D" AND 
A$<>"C" THEN 1300 
OPEN 4,4:CMD4:IF A$="D" 
THEN 1700 

FOR Z=1 TO 26:PRINT 
SPC (6) ; CHR$(64+Z) : FOR 
ZZ=0 TO 7: PRINT ZZ+1 ; 
A=PEEK(12288+Z*8+ZZ) 
AA=A: FOR Z1=0 TO 7:IF 
A-Z(Z1)=>0 THEN A=A- 
ZCZ1): PRINT "BOB"; : 
GOTO 1320 
PRINT "."; 

NEXT Z1 :PRINT AA: NEXT 
ZZ:PRINT:NEXT Z 
PRINT#4:CLOSE4:GOTO 
130 

NEXT Z1,Z2: GOTO 1230 
FOR Z=1 TO 26:PRINT 
CHR$ (64+Z);"=";:F0R 
ZZ=0 TO 7 
PRINT PEEK 

(12288+Z*8+ZZ);:NEXT 
ZZ:PRINT:NEXT Z 
PRINT#3:CL0SE4:G0T0 130 

3ara Vic-20 



125 PRINT "BBBHBHBHH 

BHai'JiBsnBsoHaDHaD 

210 IF P=39 THEN 1000 
220 IF P=47 THEN FL=1 :GOTO 
1100 



230 IF P=55 THEN FL=2:G0T0 
1100 

240 IF P=63 THEN FL=3:G0T0 

1100 

245 IF P=62 THEN FL=4:G0T0 
1230 

260 IF P=14 THEN A=0:GOTO 
1230 

270 IF P=54 THEN 1300 
1000 FOR Z=0 TO 7: FOR ZZ=0 
TO 7 

1010 C1=7880+ZZ+Z*22: 

C2=PEEK(C1) 
1020 IF C2=207 THEN POKE 

C1,230 
1030 IF C2=230 THEN POKE 

C1,207 
1040 NEXT ZZ,Z:GOTO 130 
1100 FOR Z=0 TO 7: FOR ZZ=0 

TO 7 

1110 C1=7880+ZZ+Z*22:C(Z,ZZ) 
=PEEK(C1):NEXT ZZ,Z 

1120 FOR Z=0TO7:FOR ZZ=0 
TO 7 

1130 IF FL=1 THEN POKE 

7880+ZZ+Z*22,C(ZZ,7-Z) 
1132 IF FL=2 THEN POKE 

7880+ZZ+Z*22, 

C(7-ZZ,Z) 
1134 IF FL=3 THEN POKE 

7880+C7-ZZ) 

+Z*22,C(Z,ZZ) 
1136 IF FL^4 THEN POKE 

7880+ZZ+Z*22,207 
1140 NEXT ZZ,Z 
1145 IF FL=4 THEN A=0: GOTO 

1230 
1150 GOTO 130 
1230 PRINT "SBBBBBBBB" 
1270 PRINT "a";SPC(12); 

Z+1;"Hnonn«BBB";T 

1300 PRINT "BBBBB(D)ATOS 
(OARACTERES?" 

1301 print "BBBBannnn 

□□□□□□□□□□□□□□□ 
□no" 

1302 GET A$:IF A$<>"D" AND 
A$<>"C" THEN 1300 

1303 OPEN 4,4:CMD4:IF A$="D" 
THEN 1700 

1304 FOR Z=1 TO 22:PRINT 
SPC (6) ; CHR$(64+Z) : FOR 
ZZ=0 TO 7: PRINT ZZ+1; 

1305 A=PEEK(7168+Z*8+ZZ) 
1310 AA=A: FOR Z1=0 TO 7: IF 

A-Z(Z1)=>0 THEN A=A- 
Z(Z1) : PRINT "aDB";: 

INPUT 25 



GOTO 1320 1700 
1315 PRINT 

1320 NEXT Z1 :PRINT AA : NEXT 

ZZ:PRINT:NEXT Z 1710 
1330 PRINT#4:CL0SE4:G0T0 

130 



FOR Z=1 TO 22: PRINT 
CHR$(64+Z);"=";:F0R 
ZZ=0 TO 7 
PRINT PEEK 
(7168+Z*8+ZZ);:NEXT 
ZZ:PRINT:NEXT Z 



1720 PRINT#4:CL0SE4:G0T0 
130 

Si has tecleado las nuevas h'neas, ya 
esta completo tu generador de carac- 
teres. Ahora puedes moverte por la 



EL 
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retfcuia, poner y quitar elementos de 
imagen (pixels), a si como girar la reji- 
11a, obtener su imagen espectacular, 
invertirla y borrarla. Para varios de 
estos nuevos controles se utilizan las 
teclas de las funciones. 



Para girar la retfcuia hacia la iz- 
quierda, pulsa F3 y para la derecha, 
F5. La posibilidad de hacer girar un 
GDU resulta util cuando se quieren 
tener caracteres iguales o muy pareci- 
dos, orientados segun direcciones di- 
ferentes, tal como ocurre en una nave 
espacial cuando la haces girar para 
disparar sobre cualquier punto de la 
pantalla. 

La rutina de reflexion especular, 
que se obtiene pulsando F7, presenta 
la imagen de la retfcuia reflejada en 
un espejo de izquierda a derecha, es 
decir, con simetrfa respecto a un eje 
vertical que pase por el centre de la 
retfcuia. Puedes utilizarla para produ- 
cir figuras simetricas que incluyan dos 
GDU. 

Con la tecla Fl se invierte el di- 
faujo, lo que quiere decir que si un 
punto de imagen, o pixel t est aba en- 
cendido, ahora esta apagado y vice- 
versa, Esto puede dar resultados sor- 
prendentes. 

Si despues de construir un GDU en 
la retfcuia, te parece que no es lo que 
tu querfas, puedes borrarlo del todo, 
borrando la retfcuia y dejandola lista 
para empez ar otra vez. E sto se hace 
con la tecla jCLR/HOMEl Como esta 
tecla esta lejos de las teclas de movi- 
miento, es poco probable que la 
aprietes por accidente. 



USO DE TUS GDU 




La primera parte del programa 
contenia una rutina de almacena- 
miento en cinta, con la que puedes 
almacenar tus GUDU para usarlos en- 
tus propios programas. Tambien pue- 
des usar los valores de los dates en 
cada diserio. Puedes copiar a mano 
los datos de la pantalla, pulsando la 
tecla de asterisco (*) sobre la retfcuia 
de cada GDU, pero esto te puede Ile- 
var mucho tiempo. Si tienes impreso- 
ra, tambien puedes imprimir los datos 
con ella. Para hacerlo, pulsa la tecla 
de flee ha hacia arriba. 

Si quieres almacenar los caracteres 
en cinta y usarlos en tus propios pro- 
gramas sin teclear los DATAs, tienes 
que cargarlos de nuevo. Desgraciada- 
mente esto no es tan facil como po- 
dria pensarse, y tienes que usar la ru- 
tina de carga de las lfneas 1410 a 1420. 

No te olvides que en la lfnea 1410 
solo has de utilizar la mitad que se 
aplica a tu case: la primera, si tienes 
cinta, la segunda, si tienes diskette. 
Reempiaza en esta lfnea la variable 
OU con 0, y la cadena variable N$ 
con el nombre del fichero almacena- 
do (el nombre que habras tecleado al 
guardar con SAVE el con junto de ca- 
racteres del generador de GDU. 

Organizando la memoria de tu or- 
denador, puedes tener a la vez varios 
conjuntos de caracteres. Puedes cam- 
biar la zona de memoria en que se 
cargaron los datos, para que puedas 
almacenar varios bloques de caracte- 
res desde el generador de GDU y, a 
continuacion, cargarlos en memoria. 

Para hacer esto, has de cambiar los 
numeros del bucle FOR... NEXT que 
hay en la lfnea 1413. El primero de 
dichos numeros indica donde empie- 
zan dichos caracteres en memoria, y 
el segundo numero indica donde ter- 
minan. Tambien puedes modificar los 
punteros de caracteres, cambiando 
los POKEs de la lfnea 10. 

Nota; En algunos Vic-20 si se utili- 
zan sin cartucho de ampliacion al te- 
clear este programa, pueden aparecer 
mensajes de error por falta de espacio 
en la memoria. 



INPUT 27 



cCOMMODORE 64 
SPECTRUM? 



No cabe la menor duda de que el 
Commodore 64 es un ordenador tre- 
mendamente polifacetico* Incorpora 
prestaciones magnificas en los campos 
grafico y sonoro; pero, ademas, es ca- 
paz de trabajar como un Spectrum de 
Sinclair. Al menos con programas en 
BASIC. 

Esta ultima aseveracion se hace 
realidad por obra y gracia de un pro- 
grama en cassette, que no es otra cosa 
que un simulador del funcionamiento 
del otro popular microordenador. 
Una vez cargado en el 64, es posible te- 
clear un programa destinado al Spec- 
trum, sin mayores complicaciones 
de las que pueden aparecer mientras 
se trabaja con la maquina de Sinclair* 



Una vez que el programa esta en 
marcha, la sensation de haber cam- 
biado de ordenador es real. La panta- 
11a permanece toda ella en bianco y el 
cursor con la letra K en inverso, par- 
padea en la parte inferior, esperando 
a que escribamos un comando directo 
o un numero de Knea. 

Vamos a ver que ocurre si obliga- 
mos al ordenador a realizar un bucle 
FOR... NEXT. Tecleamos FOR...; , 
pero, jcaspita!, lo que aparece es FO- 
Ror. Lo que pasa es sencillo: acaba- 
mos de entrar en el mundo de las pa- 
labras clave «tokenizadas». En algiin 
momento hemos dicho en INPUT que 
el ordenador, a traves de su editor e 
interprete del BASIC, traduce deter- 
minadas palabras clave (tales como 



REM, PRINT, FOR, etc.) a un equi- 
valente que ocupa un solo byte en la 
memoria — en lugar de uno por letra, 
como serfa lo mas logico — . Este pro- 
ceso de ahorro de memoria se llama 
«tokenizacion». En el Spectrum estas 
palabras aparecen impresas en las te- 
clas y es posible escribirlas dc una 
vez, mostrandose en la pantalla como 
si las hubieramos escrito letra a letra. 
Las teclas del ordenador de Sinclair 
son, por tan to, polivalentes. Es decir, 
la presion de una tecla nos permite 
acceder a varias posibilidades, en fun- 
cion de la letra que aparezca en inver- 
so dentro del cursor. Asi, la K indica 
que espera un comando, la G un co- 
mando grafico, la L una letra, etc. La 
presion de una determinada tecla se 
relaciona con la leyenda de ese cur- 
sor. En el 64 ocurre ahora lo mismo, 
solo que deberemos fijarnos en el dia- 
grama del teclado de un Spectrum pa- 
ra no desorientarnos, puesto que la 
correspondencia entre teclas es casi 
identica. Lo de casi quiere decir que 
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ESTE ES EL SIMBOLO DE COMMODORE, COM PANIA AMERICANA. LIDER MUND1AL EN NUMERO DE ORDEN ADORES INSTALADOS. 




Este PC de Commodore 
ha hecho dudar a mas de una 



La oferta del mcrcado de los ordenadores 
PC dejaba haste hoy muy sencilla la eleccion. 
Sin embargo, Commodore, lfder reconocido 
en varios sectores de la informatica, ha ofreci- 
do una rcspucsta alternativa que atiende ple- 
namente las exigencias empresarialcs y de pro- 
fesionales liberales: su nuevo ordenador PC. 

El nuevo Commodore PC dispone de una 
versatilidad acorde eon unatecnologia depura- 
da en const ante evolucion y compatible con cl 
software standard que mas le suena, 



re 



PC' 



Estos avances, y un precio realmcnte intere- 
santc, han planleado sen as dudas entre los 
profesionales mas cualificados a la hora de eie- 
gir un bucn PC. 

Sin duda Commodore, con el mayor numero 
de ordenadores vendidos en el mundo se afian- 
za en el campo empresarial con mucha fucrza. 

Si esta interesado en conocer mas de cerca el 
nuevo PC de Commodore, pregunte en cual- 
quier concesionario Commodore, 1c sacara de 
dudas, 

PRINCIPALES CARACTI RISTICAS 
- 256 K de R AM de 9 hits - Zocalos para 512 K 
mas - 2 iinidades de diskete de 360 K - Disco 1 
Mb op eional - Interfaces serie y pararelo, in- 
cluidos - 5 slots compatibles- El mejor precio 
en esta catcgoria. 



commodore 



Microelectronica y Control cl Valencia, 49 53 08015 Barcelona - cl Ar demons, 8 28028 Madrid 
Unico representante de Commodore en Espaha. 



IS 



algunas de las teclas mas genericas 
del 64 siguen conservando su funcion. 
por ejemplo: los movimientos de cur- 
sor; [RETURN], que p asa a ser el 
equivalence de [ENTERl etc. 

La edition de una lmea de progra- 
ma previamente escrita se consigue 
mediante ICLR/HQMEl que escribe la 
linea en la base de la pantalla y nos 
permite desplazarnos por ella con las 
teclas de movimiento del cursor. 

La otra edicion, la normal del 
Spectrum, que indica los errores an- 
tes de autorizar la insertion de la li- 
nea en un programa, tambien ha sido 
incorporada en el emulador. Si pre- 
sionamos fRETURNl perdon, 
TER| , aparece una interrogation par- 
padeante tras lo erroneamente escri- 
to, Este tipo de detection de errores 
serfa de gran ayuda en otros ordena- 
dores, Commodore incluidos, porque 
permite ahorrar gran cantidad de 
«sintax errors» mientras ejecutamos 
un programa. 

La principal limitation de este 
emulador es la imposibilidad de eje- 



cutar programas en codigo maquina, 
y la razon es evidente. El codigo ma- 
quina es un conjunto de instrucciones 
directas destinadas al microprocesa- 
dor y escritas con el lexico definido 
por su fabricante. Por tanto, para que 
esta simulation fuera efectiva, el 64 
deberia disponer del mismo micro- 
procesador, el Z80; pero el que tiene 
es el 6510, de distintos fabricantes y 
juego de instrucciones. 

En realidad estan presentes casi to- 
dos los comandos del Spectrum. Hay 
excepciones como OUT, que esta re- 
lacionado con posiciones de memoria 
del Spectrum y no seria coherente su 
utilization en el 64. 

Una nota curiosa. Sabido es que los 
Microdrives son una de las peculiari- 
dades de Sinclair en sistemas de al- 
macenamiento masivo, por tanto, no 
concctables al 64. Pues bien, las uni- 
dades de diskette 1541 pasan a ser tra- 
tadas por el software como si de Mi- 
crodrives se tratase. Los mensajes de 
error son tambien replica de los em- 
pleados por el Spectrum. 



Algunos datos de interes, proporcio- 
nados por el fabricante del programa, 
son: El emulador ocupa 25 Kbytes en 
la memoria del 64; 10 Kbytes se desti- 
nan a la pantalla, y quedan 30 K li- 
bres para los programas en BASIC, 
La cifra es comparable con el modelo 
de 48 K y es superior al de 16 K. 
Tambien se lamenta de que sc vean 
mermadas las posibilidades del chip 
sintetizador de sonido, en favor del 
comando BEEP, mucho mas modesto 
en sus pretensiones. Sin embargo, en- 
cuentra el consuelo de poder dibujar 
directamente lfneas y circulos con la 
ayuda de DRAW y CIRCLE, algo 
que el 64 no hace espontaneamente. 

Nuestra conclusion es de sorpresa 
ante la magmfica emulacion de un or- 
denador tan diferente, en muchos as- 
pect os, del Commodore 64* Incluso 
hemos llegado a sospechar si Commo- 
dore no habra animado a esta gente a 
que les ayude, con su software, a «ro- 
barle» participacion en el mercado al 
Spectrum, llevandose de calle a sus 
incondicionales. 



eiZOCODt INPUT 



Todo se compra y se vende. Los antiguos zocos fueron 
lugares destinados a todo tipo de transacciones, INPUT 
tambien tiene el suyo. Vuestras operaciones de compra, 
cambio o venta seran publicadas en esta seccion, pero dos 
son las limitaciones que imponemos: 

a) La propuesta tendra que ver con la microinformatica. 

b ) Nos reservamos el derecho de no publicar aquellos 
insertos de los que se sospeche un trasfondo lucrativo, 
Ahora un ruego. Tratar de resumir a I maximo el texto; 
escribir casi como un telegrama siendo claros y concisos. 

Envia tu mensaje a: 



INPUT COMMODORE-ZOCO 
c./ Alberto Alcocer, 46 
28016 MADRID 
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FABRICANDO 
EXPLOSIONES 



Las explosiciones son un componen- 
te obligado del repertorio de los pro- 
gramadores de juegos, desde un corn- 
bate aereo hasta una guerra intereste- 
lar* Aqui veremos la manera de pro- 
gramar efectos visuales adecuados que 
podras utiiizar en una amplia variedad 
de juegos. 

Es muy facil conseguir que tus jue- 
gos sean mucho mas espectaculares, 
anadiendoles unas rutinas graficas de 
efectos especiales. Y no tienen porque 
ser programas muy complicados para 
que haya una gran diferencia en la 
apariencia. 

Como vcras, hay muchas maneras 
diferentes de producir efectos visua- 
les; lo unico que tienes que recordar 



es utiiizar el tipo de efecto adecuado 
para cada tipo de juego. 

Los efectos de llamarada que aqui 
describimos valen para toda clase de 
juegos cn los que aparczcan edificios, 
coches, barcos, tanques, etc, pero no 
quedanan bien en un juego espacial. 

Ademas, como las llamaradas y las 
expiosiones se han construido usando 
GDUs, el maxirno tamano del bianco 
esta limitado. Esto significa que no 
puedes incorporarlos sin mas en cual- 
quicr juego sin modificar la rutina. 

En el Commodore 64 no es tan facil 
programar efectos visuales como en 
otras maquinas domesticas. Las expio- 
siones mas convincentes se basan en 
gran medida en los sprites y en los gra- 
ficos de alta resolution de este orde- 
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nador. Esto significa que se requiere 
una larga rutina para su creation y, 
ademas, que normalmente se han de 
disenar especificamente para el pro- 
grama en que van a ser utilizados. Mas 
adelante veremos en este mismo arti- 
culo un ejempio de explosion genera- 
da con sprites f que pucdc utiiizar se en 
juegos diferentes. 

No obstante se pueden utiiizar ruti- 
nas mas sencillas, como esta de barras 
intermitentes, que resultan muy efica- 
ces en programas que requieren algun 
tipo de interruption visual. La siguien- 
te podria utilizarse para senalar el fi- 
nal de un juego o la perdida de una 
«vida». 

100 PRINT"a" 




110 FOR Z=0 TO 23: READ 

X:P0KE 832+Z,X:NEXT Z 

120 SYS 832:GOTO120 

130 DATA 162,0,160,200,200, 
208,253,160,250,200, 
208,253,232 



135 DATA 142,33,208,142,32, 
208,224,16,208,235,96 

Una rutina mas intercsante es la que 
sigue a continuacion, que presenta un 
diagram a de rectangulos de colores 



80 DATA 169,0,141,251,0, 
169,216,141,252,0,160, 
0,177,251,201,0,208,2, 
169,16,24 

82 DATA 233,0,145,251,24, 
230,251,165,251,201,0, 







continuamente cambiantes. Se puede 
usar en lugares semej antes en un pro- 
grama de juegos. 

5 CS="laa3IUaE3Q 

■aaMI": PRINT 
8 FOR Z=0 TO 48: READ 

X:P0KE 491 52+Z,X: NEXT Z 
10 FOR Z=1 TO 24:PRINT MID$ 
(C$,Z,1 )"*□□□□□□ 
□□□□□□□□□□□□ 
□□□□□□□□□□□□ 

20 NEXT Z: PRINT "H" 

40 FOR Z=0 TO 12 

60 FOR ZZ=55335-Z+(Z*40) TO 
56295-Z-(40*Z) STEP 
40:POKE ZZ,Z: NEXT ZZ 

70 FOR ZZ=55296+Z+(Z*40) TO 
56256+Z-(40*Z) STEP 
40:POKE ZZ,Z: NEXT ZZ,Z 



208,2,230,252,165,251 
84 DATA 201,232,208,224, 
165,252,201,219,208, 



218,98 
100 SYS 49152: FOR Z = 1 TO 
250:NEXT Z:GOTO 100 




La longitud de la rutina se controla 
con el bucle FOR... NEXT de la linea 
100, que introduce un retardo de 250 
unidades de tiempo. Este valor se pue- 
de ajustar al valor requerido, e inclu- 
so intentar suprimir completamente el 
bucle, para tener una representation 
que realmente canse a nuestra vista. 

Eliminando las lfneas 40, 60 y 70, 
perderas las barras verticales, quedan- 
do solo bandas horizontales de color 
que se mueven hacia el centre Esta 
forma puede ser preferible si quieres 
incluir algiin tipo de mensaje en la 
pantalla, lo cual puedes bacer ana- 
diendo tu comentario en 'a sentencia 
PRINT de la linea 20, despues del sim- 
bolo del cursor. 



20 NEXT Z: PRINT 

"B"TAB(20)"HOLA" 

Evidentcmente, puedes encajar los 
caracteres en esta linea para compo- 
ner tu mensaje adecuadamente. 

EXPLOSION CON SPRITES 

El breve programa que sigue es una 
sencilla demostracion de la apariencia 
y funcionamiento de un programa de 
juegos tipico, escrito en BASIC. 
Muestra un avion a reaction volando 
por la pantalla y bombardeando un 
edificio. 

10 PRINT "□"iPOKE 

53280,0: POKE 53281,0 

15 PRINT "fflHHMaMHHHffiHffi 
HHHHMHBT 'TAB ( 20) " aar 

aaiiiiEaisDHiiiiiiiiiu 

20 FOR Z=1 TO 20:PRINT 
"B"TAB(Z) 

" ariaasiiii a " 

30 POKE 1024+Z*41,32:POKE 

1065+Z*41,42:POKE 

55337+Z*41,1 
40 NEXT Z:PRINT "H"TAB(Z) 

"□□aminpnnn" 



Sin una «explosion», el efecto del 
bombardeo no resulta muy realista; 
intenta afiadir pucs estas lmeas, que 
haran que el edificio se destruya lenta- 
mente. 

45 FOR Z=1 TO 20: POKE 

1 884+RND ( 1 ) *2,RN D ( 1) *1 5+1 

10:NEXT Z 
50 POKE 1885,223:P0KE 

1845,32:P0KE 1884,104 



Incluso asf, el efecto conseguido no 
es muy espectacular. Pero ariadele 
ahora las siguientcs lmeas, que forman 
una rutina de explosion basada en los 
sprites* 

1 FOR Z=832 TO 
832+63*2: POKE Z,0:NEXT Z 

2 FOR Z=13 TO 14: FOR A=0 TO 
15: FOR B=0 TO 1: READ 
X:POKE Z*64+A*3+B,X:NEXT 
B,A,Z 

3 DATA 0,0,0,0,0,0,0,0,15, 
240,15,240,53,92,54, 
156,54,1 56,53,92,1 5, 
240,15,240 

4 DATA 0,0,0,0,0,0,0,0 

5 DATA 15,240,15,240,53, 
92,53,92,213,87,214,151, 
214,151,218,167,218,167 

6 DATA 214,151,214,151, 
213,87,53,92,53,92,15, 
240,15,240 

900 V=53248:P0KE V+21,3:POKE 

V+32,0:POKE V+33,0:POKE 

V+37,2:P0KE V+28,3 
910 POKE V+27,3:A(0)=1:A(1) 

=8:B(0)=4:B(1)=7 
915 FOR LL=1 TO 3: IF LL=1 OR 

LL=3 THEN POKE V+23,0:POKE 

V+29,0 
917 POKE V,183:P0KE V+1, 

216:DD=0 

920 IF LL=2 THEN 

POKE V+23,3:POKE 

V+29,3:P0KE V,175:POKE 

V+1,208:DD=20 
925 FOR UU=1 TO 10: FOR Z=13 

TO 14: POKE 2040,Z:POKE 

V+39,B(RND(1)*2) 
930 FOR T=1 TO DD:NEXT 

T:POKE V+38,A(RND(1)*2) 
940 NEXT Z,UU,LL:POKE V+21 ,0 



Ejecuta el programa (con RUN) 
para tener una explosion de colores. 
Esta rutina puede hacer cosas maravi- 
llosas incluso con programas de jue- 
gos scncillos. 

A pesar de su aparente complcji- 
dad, el programa es realmente muy 
sencillo; consiste basicamente en ge- 
nerar dos sprites y cambiar de uno a 
otro repetidamente (csto lo explicare- 
mos con mas detalla despues). Los da- 
tos para la «explosion» a base de spri- 
tes estan contenidos en cuatro lmeas al 
principio del programa. Antes encon- 
tramos la rutina de initialization, que 
primeramente borra un area de me- 
moria (las direcciones 832 a 1022 real- 
mente forman parte del buffer de En- 
trada/Salida de la cinta, pero estan dis- 
ponibles para que almacenemos los 
sprites). En la siguiente linea se leen 
los datos y se almacenan en las mis- 
mas direcciones, borradas. Observa 
que Z recibe los valores de 13 y 14, 
que al ser multiplicados por 64 en la If- 
nea 2, dan el comienzo del almacena- 
miento de cada uno, las direcciones 
832 y 896. El niimero 64 refleja aqui 
la cantidad de nicmoria requerida por 
cada sprite, en total 63+1 bytes. 

En todo programa, la rutina de ini- 
tialization ha do ir colocada al princi- 
pio. Por eso la segunda parte del pro- 
grama de explosion va numerada s 
partir de la lmea 900, ya que normal- 
mente sera una subrutina que forma- 
ra parte de un programa mas largo. 

La linea 900 hace operatives a los 
sprites, es decir los enciende, ponien- 
do el color de la pantalla y el borde en 
negro (el valor en la position V+32 
y V+33 ? en caso contrario se pueden 
alterar las direcciones 53280 y 53281), 
y cambiando el color del segundo 
«anillo» de cada sprite para realzar el 
efecto de la explosion. La ultima ins- 
truction de esta linea habilita el modo 
multicolor para ambos sprites. 

A partir de aqui el programa proce- 
de a activar el fondo, para que puedas 
ver los detalles a traves de los sprites, 
coloreando el centre de la explosion. 
Puedes probar a cambiar los valores 
de los numeros que siguen a los signos 
igual de la lmea 910, pero observa que 
solo los colores «calidos» y el bianco 
resultan efectivos. 



La siguiente lmea (915) controla el 
puntero, que senala al sprite pequeno 
o al grande, alternando entre ambos 
para conseguir el efecto pulsante de la 
explosion. Cuando los valores de LL 
son 1 y 3, esta en uso el sprite peque- 
no, mientras que cuando el valor es 2, 
es el grande el activo. Se anade un 
efecto de parpadeo con el bucle 
FOR... NEXT al principio de la lmea 





930. La rutina de explosion termina en 
la lmea 940, cuando se bloquea la po- 
sition de activation del sprite (53269), 
La rutina de explosion se puede 
afiadir a otros programas. Para mover 
la position de los sprites tienes que 
ajustar los valores de V y V+1 en las 
lmeas 915 y 920, V es la coordenada 
X de la pantalla, V+1 es la coordena- 
da Y; la diferencia entre ambas es 33 
en todos los casos. El valor de V en la 
linea 915 supera en 8 a cualquier va- 
lor que escojas para V en la linea 920, 
El valor de V+1 e n las line as 920 y 
915 supera entonces en 33 a V. 
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zar misiles contra un bianco, en este 
caso la estacion espacial. 

El jugador dispone de cuatro defen- 
sas o pantallas para protegerse de los 
misiles atacantes. Sin embargo no po- 
dras usar todos los blindajes a la vez, 
ya que solo tienes una cantidad de 
combustible limitada para moverlos. 

A fin de que el juego resulte mas di- 
ficil, ei programa esta disenado de 
modo que el invasor se mueva de for- 
ma aleatoria, pudiendo tambien desa- 
parecer en el hiperespacio y reapare- 
cer de nuevo por otro sitio totalmente 
distinto. 




go llamado Estacion Espacial, que co- 
rre sobre el Commodore 64 y te ense- 
nara la manera de programar el movi- 
miento aleatorio de un «invasor» por 
la pantalla, asi como la forma de lan- 



Tal como se presente aqui el juego, 
no esta realmente complete , ya que le 
falta la puntuacion y el cronometraje. 

Pero esto se remedia facilmente con 
los metodos que presentamos en los 
capitulos anteriores. 

Aunque el extraterrestre tiene la 
misma apariencia que en los juegos 
eomerciales, la estacion espacial es 
solo una siiueta. Si quieres pasar una 
media hora interesante, puedes volver 
a dibujar la tuya propia utilizando los 
GDUs (graficos definidos por el usua- 
rio) en la forma indicada en varios ar- 
ticulos de INPUT. No obstante tienes 
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Sin una «explosion», el efecto del 
bombardeo no resulta muy realista; 
intenta anadir pues estas lfneas, que 
haran que el cdificio se destruya lenta- 
mente. 

45 FOR Z=1 TO 20: POKE 

1884+RND(1)*2,RND(1)*15+1 

10:NEXT Z 
50 POKE 1885,223: POKE 

1845,32: POKE 1884,104 



Incluso asf, el efecto conseguido no 
es muy espectacular. Pero anadcle 
ahora las siguientes lfneas, que forman 
una rutina de explosion basada en los 
sprites. 

1 FOR Z=832 TO 
832+63*2: POKE Z,0:NEXT Z 

2 FOR Z=13 TO 14: FOR A=0 TO 
15: FOR B=0 TO 1 : READ 
X:POKE Z*64+A*3+B,X:NEXT 
B,A,Z 

3 DATA 0,0,0,0,0,0,0,0,15, 
240,15,240,53,92,54, 

1 56,54,1 56,53,92„1 5, 
240,15,240 

4 DATA 0,0,0,0,0,0,0,0 

5 DATA 15,240,15,240,53, 
92,53,92,213,87,214,151, 
214,151,218,167,218,167 

6 DATA 214,151,214,151, 
213,87,53,92,53,92,15, 
240,15,240 

900 V=53248:P0KE V+2 1,3: POKE 

V+32,0:POKE V+33,0:POKE 

V+37,2:P0KE V+28,3 
910 POKE V+27,3:A(0)=1 :A(1) 

=8:B(0)=4:B(1)=7 
915 FOR LL=1 TO 3: IF LL=1 OR 

LL=3 THEN POKE V+23,0:POKE 

V+29,0 
917 POKE V,183:POKE V+1, 

216:DD=0 

920 IF LL=2 THEN 

POKE V+23,3:POKE 

V+29,3:P0KE V,175:P0KE 

V+1,208:DD=20 
925 FOR UU=1 TO 10: FOR Z=13 

TO 14: POKE 2040,Z:POKE 

V+39,B(RND(1)*2) 
930 FOR T=1 TO DD:NEXT 

T:POKE V+38,A(RND(1)*2) 
940 NEXT Z,UU,LL:POKE V+21 ,0 
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do el color de 
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y V+33, en caso contrario se pueden 
alterar las direcciones 53280 y 53281), 
y cambiando el color del segundo 
«anillo» de cada sprite para realzar el 
efecto de la explosion. La ultima ins- 
truction de esta linea habilita el modo 
multicolor para ambos sprites. 

A partir de aqui el programa proce- 
de a activar el fondo, para que puedas 
ver los detalles a traves de los sprites, 
coloreando el centro de la explosion. 
Puedes probar a cambiar los valores 
de los numeros que siguen a los signos 
igual de la linea 910, pero observa que 
solo los coiores «calidos» y el bianco 
resultan efectivos. 
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930. La rutina de explosion termina en 
la linea 940, cuando se bloquea la po- 
sition de activation del sprite (53269). 

La rutina de explosion se puede 
anadir a otros programas. Para mover 
la position de los sprites tienes que 
ajustar los valores de V y V+1 en las 
lfneas 915 y 920. V es la coordenada 
X de la pantalla, V+1 es la coordena- 
da Y; la diferencia entre ambas es 33 
en todos los casos. El valor de V en la 
linea 915 supera en 8 a cualquier va- 
lor que escojas para V en la linea 920. 
El valor de V+1 en las lineas 920 y 
915 supera entonces en 33 a V, 
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asta los ulti- 
s, los enemi- 
ndo siempre 
tienes la ma- 
rarlos en una 
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zar misiles contra un bianco, en este 
caso la estacion espacial. 

El jugador dispone de cuatro defen- 
sas o pantallas para protegerse de los 
misiles atacantes. Sin embargo no po- 
dras usar todos los blindajes a la vez, 
ya que solo tienes una cantidad de 
combustible limitada para moverlos. 

A fin de que el juego resulte mas di- 
ficil, el programa esta disenado de 
modo que el invasor se mueva de for- 
ma aleatoria, pudiendo tambien desa- 
parecer en el hiperespacio y reapare- 
cer de nuevo por otro sitio totalmente 
distinto. 




go llamado Estacion Espacial, que co- 
rre sobre el Commodore 64 y te ensc- 
nara la manera de programar el movi- 
miento aleatorio de un «invasor» por 
la pantalla, asf como la forma de lan- 



Tal como se presente aqui el juego, 
no esta realmente completo, ya que le 
falta la puntuacion y el cronometraje. 

Pero esto se remedia facilmente con 
los metodos que presentamos en los 
capitulos anteriores. 

Aunque el extraterrestre tiene la 
misma apariencia que en los juegos 
comerciales, la estacion espacial es 
solo una silueta. Si quieres pasar una 
media hora interesante, puedes volver 
a dibujar la tuya propia utilizando los 
GDUs (graficos definidos por el usua- 
rio) en la forma indicada en varios ar- 
ticulos de INPUT. No obstante tienes 
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Sin una «explosion», el efecto del 
bombardeo no resulta muy realista; 
intenta anadir pues cstas lfneas, que 
haran que el edificio se destruya lenta- 
mente. 

45 FOR Z=1 TO 20: POKE 

1884+RND(1)*2,RND(1)*15+1 

10: NEXT Z 
50 POKE 1 885,223 :POKE 

1845,32: POKE 1884,104 

Incluso asi, el efecto conseguido no 
es muy espectacular. Pero anadele 
ahora las siguientes lfneas, que forman 
una rutina de explosion basada en los 
sprites. 

1 FOR Z=832 TO 
832+63*2: POKE Z,0:NEXT Z 

2 FOR Z=13 TO 14: FOR A=0 TO 
15: FOR B=0 TO 1 : READ 
X:P0KE Z*64+A*3+B,X:NEXT 
B,A,Z 

3 DATA 0,0,0,0,0,0,0,0,15, 
240,15,240,53,92,54, 
156,54,156,53,92/15, 
240,15,240 

4 DATA 0,0,0,0,0,0,0,0 

5 DATA 15,240,15,240,53, 
92,53,92,213,87,214,151, 
214,151,218,167,218,167 

6 DATA 214,151,214,151, 
213,87,53,92,53,92,15, 
240,15,240 

900 V=53248:P0KE V+21,3:P0KE 

V+32,0:POKE V+33,0:POKE 

V+37,2:P0KE V+28,3 
910 POKE V+27,3:A(0)=1:A(1) 

=8:B(0)=4:B(1)=7 
915 FOR LL=1 TO 3: IF LL=1 OR 

LL=3 THEN POKE V+23,0:POKE 

V+29,0 
917 POKE V,183:POKE V+1, 

216:DD=0 

920 IF LL=2 THEN 

POKE V+23,3:P0KE 

V+29,3:P0KE V, 175: POKE 

V+1,208:DD=20 
925 FOR UU=1 TO 10: FOR Z=13 

TO 14: POKE 2O40,Z:POKE 

V+39,B(RND(1)*2) 
930 FOR T=1 TO DD:NEXT 

T:POKE V+38,A(RND(1)*2) 
940 NEXT Z,UU,LL:POKE V+21,0 
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y V+33, en caso contrario se pueden 
alterar las direcciones 53280 y 53281), 
y cambiando el color del segundo 
«anillo» de cada sprite para realzar el 
efecto de la explosion. La ultima ins- 
truction de esta linea habilita el modo 
multicolor para ambos sprites. 

A partir de aqui el programa proce- 
de a activar el fondo, para que puedas 
ver los detalles a traves de los sprites, 
coloreando el centro de la explosion. 
Puedes probar a cambiar los valores 
de los numeros que siguen a los signos 
igual de la linea 910, pero observa que 
solo los eolores «calidos» y el bianco 
resultan efectivos. 



Estimado comprador de INPUT Commodore: 

Usted ya ha podido apreciar la calidad de INPUT 
Commodore. Sin duda mas de un familiar o arnigo se van a 
sentir interesados por su revista cuando ia vean en su casa. 

Y mas de una vez usted va a tener que prestarla. ^Por que no 
les da facilidades a ellos o a usted mismo? Usted puede 
asegurarse todos los ejemplares de INPUT Commodore^ 
al suscribirse, utilizando elbolednde 
suscripcion que contiene su 
revista beneficiandose de una 
oferta excepcional... pero tarnbien 
puede beneficiar a un amiga con 
sus mismas condiciones, 

Y iademas usted obtiene un 
REGAL MISTERIOSO... por ser 
bum amigo! 




Si deseo me envien a mi domicilio los 
proximos 11 ejemplares de INPUT Commodore, 
por solo 3.190 Ptas. en lugar de 3.850 Ptas. 
(precio de cubierta de 1 1 ejemplares) 
ahorrandorne 660 Ptas. 

Nombre I I L_ 

Apellidos I i _L 



FORMA DE PAGO: 

REEMBOLSO. despues 
de mi primer ejemplar 
de suscripcion. 

Envienme el regalo a-. 



Mombre L 
Apellidos L 
Qomidlto . 
Num i t 



Poblacifin. l_ 



EN VIE ESTA ORDEN 
NO NECESITA FRANQUEO 




jPlSO 



930. La rutina de explosion termina en 
la linea 940, cuando se bloquea la po- 
sicion de activacion del sprite (53269). 

La rutina de explosion se puede 
anadir a otros programas. Para mover 
la posicion de los sprites tienes que 
ajustar los valores de V y V+1 en las 
lineas 915 y 920. V es la eoordenada 
X de la pantalla, V+1 es la eoordena- 
da Y; la diferencia entre ambas es 33 
en todos los casos. El valor de V en la 
lmea 915 supera en 8 a cualquier va- 
lor que escojas para V en la linea 920. 
El valor de V+1 en las lineas 920 y 
915 supera entonces en 33 a V. 
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Desde Los Invasores, hasta los ulti- 
inos juegos de mardanitos, los enemi- 
gos que atacan disparando siempre 
hail sido un desafio. Aquf tienes la ma- 
nera de crearlos e incorporarlos en una 
rutin a completa de juego. 

Los juegos tendran mejor aspecto si 
utilizamos algunas de las caracteristi- 
de los graficos de alta resolucion 
tu maquina, en lugar de servirte de 
los caracteres ordinarios. Los progra- 
mas con graficos de alta resolucion se- 
ran mas complicados que los que solo 
emplean a los caracteres del teclado, 
pero ten por seguro que los resultados 
realmente merecen la pena. 

Muchos juegos de marcianitos estan 
basados en la presencia de enemigos 
invasores o extraterrestres que dispa- 
ran contra ti\ en vez de detenerse pla- 
cidamente a esperar que los aniquiles. 
Seguidamente te presentamos un jue- 



zar misiles contra un bianco , en este 
caso la estacion espacial. 

El jugador dispone de cuatro defen- 
sas o pantallas para protegerse de los 
misiles atacantes. Sin embargo no po- 
dras usar todos los blindajes a la vez, 
ya que solo tienes una cantidad de 
combustible limitada para moverlos. 

A fin de que el juego resulte mas di- 
ficil, el programa esta disenado de 
modo que el invasor se mueva de for- 
ma aleatoria, pudiendo tambien desa- 
parccer en el hiperespacio y reapare- 
cer de nuevo por otro sitio totalmente 
distinto. 




go llamado Estacion Espacial, que co- 
rre sobre el Commodore 64 y te ense- 
nara la manera de programar el movi- 
miento aleatorio de un «invasor» por 
la pantalla, asf como la forma de lan- 



Tal como se presente aqui el juego, 
no esta realmente completo, ya que le 
falta la puntuacion y el cronometraje. 

Pero esto se remedia facilmente con 
los metodos que presentamos en los 
capitulos anteriores, 

Aunque el extraterrestre tiene la 
misma apariencia que en los juegos 
comerciales, la estacion espacial es 
solo una silueta. Si quieres pasar una 
media hora interesante, puedes volver 
a dibujar la tuya propia utilizando los 
GDUs (graficos definidos por el usua- 
rio) en la forma indicada en varios ar- 
ticulos de INPUT. No obstante tienes 
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que tener cuidado de mantenerte den- 
tro del area utilizada por nuestra esta- 
cion espacial. De no hacerlo asf, po- 
dria solaparse con las pantallas defen- 
sivas, requiriendo una revision dema- 
siado laboriosa. 

La presente version del juego de la 
estacion espacial utiliza los sprites, 
cuya informacion esta contenida en un 
gran numero de sentencias DATA 
cerca del comienzo del programa. 






10 POKE 56,1 00: POKE 

55,0: POKE 52,1 00: POKE 

51,0:CLR 
20 DATA 0,254,0,3,57,128,7, 

255,192,0,16,0,16,56, 

16,56,84 
25 DATA 56,124,146,124, 

131,255 
30 DATA 130,144,56,18,184, 

16,58,144,16,18,131, 

255,130,254,84,254,252 
35 DATA 56,126,0,56 
40 DATA 0,0,40,0,0,56,0,1, 

199,0,6,16,192,1,199, 

0,0,124,0 
50 DATA 0,0,0,127,255,254, 

64,0,2,64,0,2,64,16, 

2,64,48,2,64,16,2,64, 

16,2,80,56 
60 DATA 114,84,0,18,94,0, 

114,68,0,66,68,56,114, 

64,8,2,64,56,2,64,8,2,64 
70 DATA 56,2,64,0,2,64,0, 

2,127,255,254,0,0,0 
80 DATA 0,0,0,0,0,0,0,0,0, 

0,0,0,0,0,0,0,0,0/<M, 

0,0,8,0,0,42,0,0,20, 

0,0,42,0,0 

90 DATA 42,0,0,73,0,0,8,0, 

0,0,0,0,0,0,0,0,0,0,0, 
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0,0,0,0,0,0,0,0,0,0 
100 DATA 0,0,0,0,0,0,0,0, 
0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0,0,3,3,0,4,132, 

128,255 
110 DATA 255,255,72,72,68, 
48,48,56,0,0,0,0,0,0, 

0,0,0,0,0,0,0,0,0,0,0, 



0,0,0,0,0,0 
120 DATA 0,0,16,0,0,24,0, 

0,20,0,0,20,0,0,20,0,0, 

24,0,0,48 
125 DATA 0,0,80,0,0,80,0,0, 

48,0 

130 DATA 0,24,0,0,20,0,0, 
20,0,0,24,0,0,48,0,0, 

80 ,0 ,0 ,80 ,0 ,0 ,80 ,0 ,0 , 

48,0,0,16 
140 DATA 0,0,16,0 
210 FOR ZZ=0 TO 4:P0KE 

2040+ZZ, 200+ZZ 
220 FOR Z=1 TO 63: READ X:P0KE 

1 2799+ (ZZ*64)+Z,X: NEXT 

Z,ZZ 

230 CLR:V=53248:FU=100:POKE 

650,255: POKE 53280,0: 

POKE 53281,0: PRINT "□" 
240 POKE V+2,145:POKE 

V+3,120: POKE 

V+23,250:POKE V+29,250: 

POKE V+30,240 
250 XX=31+INT(RND(1)*210) :YY 

=60:DX=1:DY=1:IF 

RND(1)>.50 THEN 

YY=180:DY=-DY 
260 PRINT "H"TAB(14)"HFUEL: 
FU 

270 IF RND(1)>.90 THEN XX= 

31+IN T(RND(1)*210):YY= 

60:DX=1 :DY=1 
320 XX=XX+DX:IF XX=<30 OR 

XX=>245 THEN DX=-DX 
330 YY=YY+DY:IF YY=<50 OR 

YY=>190 THEN DY=-DY 
340 POKE V,XX:POKE V+1,YY:IF 

F=0 THEN F=1:FX=XX:FY=YY 
350 IF F=1 THEN 60 SUB 410 
360 GET A$:S$="":SH=0 
370 IF A$="4" OR A$="2" THEN 

SH=1:P0KE 2043,204: 

S$ = A$ 

380 IF A$="1" OR A$="3" THEN 
SH=1 :POKE 2043,203: 
S$=A$ 
390 IF SH=1 THEN 470 
400 POKE V+21,247:G0T0 260 
410 IF FX>153 THEN FX=FX-5 
420 IF FX<153 THEN FX=FX+5 
430 IF FY<135 THEN FY=FY+5 
440 IF FY>135 THEN FY=FY-5 
450 POKE V+4,FX:P0KE 
V+5,FY:IF PEEK 
CV+30)=246 THEN 550 
460 RETURN 

470 IF S$="4" THEN L1=118: 



L2=120 

480 IF S$="2" THEN L1=175: 
L2=120 

490 IF S$="1" THEN Li =145: 
L2=95 

500 IF S$="3" THEN L1=145: 

L2=145 
510 POKE V+6,L1 :POKE 

V+7,L2:FU=FU-1:POKE 

V+21,255:IF FU<0THEN 540 
520 IF PEEK(V+30)=252 THEN 

F=0:GOTO 240 
530 GOTO 260 

540 PRINT TAB(4)"BaESTAS 

SIN FUEL!":GOTO 560 
550 PRINT TAB(11)"SaTE HAN 

DADO!" 
560 FOR ZZ=1 TO 10: FOR 

T=1 TO 100: NEXT: POKE 

V+21,247 
565 FOR T=1 TO 100: NEXT: POKE 

V+21,0 
570 NEXT: PRINT "□"TABC6) 

1 1 aaaaaaaaaaaaaa 

PRESIONA LA BARRA 

DE ESPACIOS" 
580 GET X$:IF X$<>"n M THEN 

580 
590 RUN 230 

La primera Imea del programa re- 
serva espacio para el sprite en la me- 
moria del ordenador, de modo que el 
programa BASIC utilizado para mo- 
verlo no perturbe al programa del pro- 
pio sprite. 

Las lfneas 20 a 140 contienen la in- 
form acion necesaria para los sprites de 
la estacion espacial, defensas, misiles 
y extraterrestres. Las lineas 210 y 220 
situan los punteros de los sprites y al- 
macenan sus datos en la memoria. 
Cada uno ocupa 64 bytes (3 veces 21 , 
mas uno extra), habiendo cinco de 
ellos, lo cual explica el significado de 
estos valores en estas dos line as de 
programa. 

Las siguientes dos lineas inicializan 
el ordenador, ajustan las variables, las 
diversas posiciones de los sprites, la 
autorrepeticion de las teclas y los colo- 
res. 

El programa continua en la linea 
250, creando una posicion aleatoria 
para el sprite invasor, que aparece so- 
bre una linea de la parte superior de 
la pantalla o una linea del fondo, de- 
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alcanzar el centro de la estacion espa- 
cial sin ser intcrrumpido — o lo que es 
Jo mismo, si en la linea 520 no se ha 
detectado la colision de un sprite — se 
satisface la condition de la linea 450. 
Comienza entonces la rutina de fin de 
juego en las lmeas 540 y siguientcs, 
presentandote un mensaje y poniendo 
la pantalla con intermitcncia antes de 
ofrecerte otra partida. 

Cada vez que se activa la pantalla, 
se disminuye el contador de carburan- 
te, la variable FU. Cada vcz que el 
programa vuelve a este punto, los con- 



pendiendo del valor obtenido por la 
funcion RND. 

El programa empieza en la linea 260 
con la pantalla en bianco, el combus- 
tible que queda y el invasor. Este lan- 
za un misil y sale corriendo. Las Ifneas 
360 a 400 activan las defensas de la es- 





tacion espacial dependiendo de cual 
de las teclas 1, 2, 3 6 4 haya sido pul- 
sada. Si se ha activado alguna de las 
defensas, se cumple la condicion de la 
linea 390 y el programa salta a la ru- 
tina de las lmeas 470 a 530, que con- 
trola la position del sprite de la defen- 
sa activada. 

Con la rutina que abarca las Iineas 
410 a 460, el misil se aproxima a su 
bianco. Si el sprite del misil consigue 



troles de cursor del indicador de com- 
bustible de la sentencia PRINT de la 
linea 260 mueven el cursor un lugar 
hacia la izquierda, con lo que de he- 
cho se elimina de la anterior cantidad 
de fuel antes de anadir el nuevo valor 
de FU. Cuando el valor de FU es me- 
nor que cero en la Imea 510, se pro- 
duce un salto a la parte principal de la 
rutina dc fin de juego. 
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SIEMPRE LOS PRIMEROS 
EN TENER LO ULTIMO 




cufocfejst 

P ° de la Castellana, 268, 3.° C. 28046-MADRID. 

Tel.: (91) 733 25 00 



SKAOMIMl) II 




BLACKWYCH 

La ultima novedad de ULTIMATE para 
Commodore. Vuelven las aventuras del 
he roe de Staff of Karnath y Entombed, Sir 
Arthur Pendragon, en un juego to da via 
cabe, mas apasionante. 



P.V.P.: 2.100 ptas. 

Precio Socios C. de Sofl: 1 .890 ptas. 



BEACH HEAD II 

Ya esta aqui la esperada continuation de 
Beach Head, el juego mas vendido para 
Commodore. Los graficos y el nuevo 
simulador de voz que se tncluyen en el 
Beach Head II te haran sentirte en pleno 
centro de la batalla por la conquista de la 
fortaleza enemiga. 

P.V.P.: 2.900 ptas. 

Precio Socios C. de Soft: 2.600 ptas. 




SUPER ZAXXON 

La continuacion de Zaxxon supera a la 
primera no solamente en graficos y 
realismo, sino que la imaginacion con que 
esta desarroJIado el juego alcanza niveles 
sencillamente extraordinarios. 



P.V.P.: 2.600 ptas. 

Precio Socios C. de Soft: 2.340 ptas. 



jjl Y LOB THSS PnOGttAMAB POB BOLD a- J 00 FfA 



JJJ 

- j j j j j 



IHAZfE HOY MISMO SOCIO DEL QlFfCULO DE SQFf! Memas de poder adquirir tus pro- 
gramas al mejor precio, recibiras informacion de forma periodica y gratuita, del mejor software que apa- 
rezca en el mercado. 

I DUE FJA YOUE FJA OEH PAFIA SEFi SOCIO DEL CJFfCUL O DE SOFT? Asl de facil: envia- 
nos por correo tu nombre, direccion y modelo de ordenador, o bien, pide por telefono o por correo tu pri- 
mer programa. iY entraras a formar parte del CIRCULO DE SOFT de forma inmediata! 



□ Si r quiero ser SOCIO desde hoy mismo del CIRCULO DE SOFT y recibir periodicameme informacion de novedades de software, asi como beneficiarme desde hoy mismo de las pre- 
cios reducidos reservadps a los SOCIOS y de sus Qfertas Especiates El ser SOCIO no me obliga a compra alguna. 

Si prefieres formalizar tu compra por telefono puedes hacerlo I la man do al (91 J 733 25 00. iiNO SE COBRAN LOS GAST0S DE ENV10 POR CORREO!! 

TITULO P.V.P, ORDENADOR 



□ ContrarreemboLso □ Giro Postal □ Talon adjunia a Microamigo, S A □ Tarpa VISA \\!\ . . Fecha caducidad — 

Nombre - - Apeliidos Edad 

Domicilio . - — Telefono _ . — 

Localidad . - CP . _ Provincia _ 



ENVIA MENSAJES 
SECRETOS (y II) 



■ 


RUPTURA DE CODIGOS 


■ 


FRECUENCIA 


■ 


NUEVOS METODOS 


DE CODIFICACION 



DICCIONARIOS DE CODIGOS 



Aqui tienes algunos procedimientos 
mas sutiles para enviar informacion 
secreta, preservandola de caer en ma- 
nos inadecuadas. Tambien se exami- 
nan brevemente algunos metodos de 
ruptura de codigos. 

Como vimos en el articulo ante- 
rior (en nuestro numero de septiem- 
bre) el problema de la codificacion de 
la informacion reservada admite mu- 
chos planteamientos. Algunos de es- 
tos metodos son relativamente faciles 
de descifrar, pero con ayuda de los 
ordenadores es posible emplear pro- 
cedimientos cada vez mas complica- 
dos, 

RUPTURA DE CODIGOS 

A medida que los criptografos se 
esfuerzan en inventar codigos mejo- 
res y mas seguros se produce un es- 
fuerzo paralelo por parte de los «rom- 
pedores de codigos», que hacen todo 
lo posible por frustar el esfuerzo de 
los primeros. 

En los casos mas sencillos de cifra- 
do por transposicion o sustitucion se 
dispone de una potente herramienta, 
consistente en contar la frecuencia 
con la que aparecen todas las letras. 

Cada idioma dispone de una serie 
de letras que aparecen con mas fre- 
cuencia en un texto cualquiera que 
otras, en castelleno este es el caso de 
las E, A, O, N, S, I. Segun esto, si 
despues de contar el numero de veces 
que aparece cada letra en un texto 
cifrado siguen siendo las mas frecuen- 
tes EAONSI, lo mas probable es que 
te encuentres ante un cifrado por 
transposicion. Si, por el contrario, 
son otras las letras que aparecen con 
mayor frecuencia, deberas considerar 
la posibilidad de que se trata de un 
cifrado por sustitucion. 

En ambos resulta necesario contar 
la frecuencia de cada letra en el texto 



del mensaje. Esta es una labor que 
manualmente ejecutada requiere 
tiempo y esta sujeta a errores. El pro- 
grama de distribucion de la frecuencia 
que te ofrecemos a continuacion te 
ahorra ese tedioso trabajo. Todo lo 
que tienes que hacer es introducir el 
texto, sin dejar espacios en bianco en- 
tre palabras, y cuando h ayas termina- 
do presiona | RETURN L Volvera a 



aparecer la leyenda de introduccion 
del texto y esta vez teclearemos uni- 
camente un asterisco y [RETURN | . De 
esta forma, el ordenador presenta 
una lista de las letras del alfabeto y la 
cantidad de veces que ha sido utiliza- 
da cada una. Como observacion, cabe 
decir que cuando escribimos el texto 
hay unos instantes de aparente inacti- 
vidad por parte del ordenador, ocu- 
pado en la tarea de procesamiento del 
mensaje. 

A continuacion teclea el programa 
y observa como funciona todo ello en 
la practica. 

30 PRINT M US>liaCONTEO DE 

FRECUENCIA" 
50 PRINT ir a«NO DE J ES 

ESPACIOS" : PRINT M ENTRE 

PALABRAS" 
60 DIM NC28) 

70 PRINT lf MPARA TERMINAR LA 

ENTRADA DE TEXTO Y" 
80 FOR T=1 TO 

28:N(T)-0:NEXT T 
85 PRINT"OBTENER EL 

RESULTADO TECLEA * ,r 
90 INPUT"SESCRIBE EL 

TEXTOQ";A$ 
100 IF A$- M *"THEN 180 
110 PRINT" 

120 FOR 1 = 1 TO LEN (A$) 

130 FOR J=1 TO 26 

140 IF J=ASC(MID$(A$,I,1))- 

64 THEN N(J)=NCJ)+1 
150 NEXT J 



160 NEXT I 
170 GOTO 90 
180 PRINT" □" 

190 PRINT"flLETRAllFREC illitl 
LETRAIIFRECS" 

200 FOR 1-1 TO 13 

210 PRINT CHR$(64+1);TAB(5); 

NCI);TAB(13);CHR$(77+I), 

TAB(18) ;N(13+I) 
220 NEXT I 
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En cuanto a su funcionamiento, el 
programa se limita a ejecutar un pro- 
cedimiento de conteo. En la primera 
fase del mismo asigna el valor a ca- 
da una de las 28 variables indexadas. 
En dichas variables se almacenan los 
resultados parciales y totales de las 26 
letras. Las dos ultimas se incluyen pa- 
ra el caso de que quiera modificar el 
nrograma para obtener porcentajes a 
cualquier otro dato estadistico aisla- 
do. 

CODIGO DE WIULTIPLICAC10N 

Durante la guerra civil norteameri- 
cana se utilize el codigo de la empali- 
zada para enviar mensajes secretos. 



Su funcionamiento es mas o menos el 
siguiente. Supongamos que quieres 
enviar este mensaje: CONSULT A 
VENT A URGENTE, que podria te- 
ner un interes comercial. En una hoja 
de papel cuadriculado escribe la pri- 
mera letra del mensaje en la lmea su- 
perior, la segunda letra en la segunda 
lmea, la tercera en la primera lmea y 
asi, sucesivamente con las demas, 
hasta obtener: 

CNUTVNARET 
OSLAETUGNE 

que, como veras, recuerda a los pos- 
tes ferroviarios colocados al tresboli- 
llo. Este mensaje se puede codificar 
como CNUTVNARET OSLAE- 



TUGNE o tambien puede trocearse 
en longitudes de palabra mas reales ? 
asi: 

CNUTV NARETOS LAETUGNE 

El codigo de la empalizada es real- 
mente un caso especial de los moder- 
nos codigos multiplicativos. Ignoran- 
do los espacios, el texto original del 
mensaje en claro contiene 20 caracte- 
res. Estos pueden ser almacenados en 
cadenas de 2 x 10, 10 x 2, 5 x 4 6 
4x5 elementos, tal como hemos vis- 
to. 

Todo el que intente romper el codi- 
go sin un conocimiento previo de la 
clave de multiplicacion tendra, sin du- 
da, gran cantidad de trabajo ante si. 
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Program^" 



Lo que ocurrira es que iremos llenan- 
do la pagina con el mensaje en senti- 
do vertical, hasta llenar la primera ca- 
dena. Seguidamente se comienza con 
el principio de la segunda y as! sucesi- 
vamente. Una vez todas llenas pode- 
mos descifrar el mensaje, Es por esto 
que resulta una buena idea el hecho 
de intercalar algunas letras falsas en 
el mensaje para dificultar el trabajo 
de los intrusos. 

El programa utiliza tambien la fun- 
ction de troceo y manipulation de ca- 
denas (entre las lineas 140 a 210). El 
codigo de multiplication simplemente 
lee el mensaje de una cadena en una 
direction y lo visualiza en la otra. 
Sencillo, pero efectivo. 

^^^^S para Commodore-64 

30 PRINT"nM>liaC0DIG0 DE 

MULTIPLICACION" 
50 PRINT" HM3BN0 DEJES 

ESPACIOS ENTRE PALABRAS" 
60 INPUT"MTEXT0H";M$ 
70 INPUT"FILASil";M 
80 INPUT"COLUMNASH";N 
90 INPUT"CODIFICA(C) 
DEC0DIFICA(D)";E$ 
100 PRINT" □" 
110 IF E$="C" THEN X=M 
120 IF E$="D" THEN X=N 
130 DIM D$(X) 
140 FOR 1-1 TO X 
150 D$(I)="" 

160 FOR J=1 TO LEN (M$) STEP X 

170 B$=MID$(M$,I+J-1,1) 

180 D$(I)=D$(I)+B$ 

190 NEXT J 

200 PRINT D$(I) ; 

210 NEXT I 



LIBRO DE CLAVES 



Hasta ahora solamente hemos con- 
siderado los metodos de cifrado. Las 
claves, propiamente dicho, son pala- 
bras o frases completas cifradas por 
otras palabras o numeros. Son tradi- 
cionalmente empleadas por grandes 
empresas que operan partiendo de 
premisas fijas. Las embajadas, los 
barcos y los negocios caen en esta ca- 
tegoria. Operando desde ubicaciones 
fijas resulta preferible, porque se pre- 



cisan uno o mas gruesos diccionarios 
para traducir el texto en bruto. 

El programa del libro de claves dis- 
pone de un pequeno diccionario de 20 
palabras. Lo primero que hace el pro- 
grama es leer (READ) los datos in- 
corporados en las scntencias DATA, 
que son las palabras y el numero del 
codigo que le hacemos corresponder 
a cada una. Simultaneamente. las va 
depositando en la cadena bidimensio- 
nal AS(LJ). 

La siguiente section (lineas 120 a 
170) toma una palabra del mensaje y 
proporciona el numero asociado co- 
mo respuesta. Si, por ejemplo, 
AS(1,6) = SALIDA DESDE obten- 
dremos en la pantalla el contenido del 
elemento AS(2,6) = «68677». 

Un mensaje mas largo, que podria 
ser: SALIDA DESDE NUEVA 
YORK A MEDIANOCHE. LLE- 
GADA A PARIS DOMINGO ME- 
DIANOCHE, sera codificado como: 
68677 54982 10996 26569 68719 10996 
90075 48553 26569. 

Por ot.ro lado, cl mensaje en clave: 
74891 22317 10996 23874 se traduce 
como: ENVIA DINERO A ROMA. 

Con este sencillo programa sera 
mas rapido codificar y decodificar que 
empleando el metodo manual, pues 
cuando las palabras deben ser elegi- 
das entre cientos o miles el ahorro de 
esfuerzo es evidente. 

^^^H para C-64 y Vic-20 

30 PR I NT "DSP* Ha LIBRO DE 

CODIGOS" 
50 DIM A$(2,20) 
60 FOR 1=1 TO 2 
7© FOR J=1 TO 20 
80 READ A$(I,J) 
90 NEXT J, I 
100 PRINT"SISQUIERES 
CODIFICARC0) 
DEC0DIFICAR(1)":INPUT X 
120 INPUT"SESCRIBE LA 

PALABRAU;M$ 
130 IF M$- '*" THEN 280 
140 FOR T=1 TO 20 
150 IF M$=A$(1+X,T) THEN 

PRINT A$(2-X,T) 
160 NEXT T 
170 GOTO 120 
180 DATA NUEVA YORK, 




Dos importantes metodos de 
ruptura de codigos. 




L0NDRES, PARIS, ROMA 
190 DATA LLEGADA, SALIDA 

DESDE, VA 

A,ESCAPA,SABAD0 
200 DATA DOMINGO, TARDE, 

AMANECER,MEDI AN0CHE 
210 DATA N0CHE,A,EN,EL, 

ENVIA 

220 DATA DINERO, C0MIDA 
230 DATA 54982,73581,90075, 
23874 

240 DATA 68719,68677,10327, 
40476 

250 DATA 27921,48553,11072, 
70355 

260 DATA 26569,74832,10996, 
12128 

270 DATA 69783,74891,22317, 

98724 
280 END 

De todas formas es posible aumen- 
tar el numero de palabras a mas de 
20, basta con variar las cifras que van 
entre parentesis detras de DIM AS, 
aumentar la cantidad de palabras y 
codigos en las sentencias DATA y al- 
terar los bucles FOR I y FOR J, para 
que ejecuten la lectura de datos las 
veces que sea preciso. 
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Para no tener que andar 
con mil ojos. 



ooo 



o«o«oo«oo 

ooo«oo«oo 



Microtodo. Todo en Microinformatica. 



C/ Orense, 3. Tfno.: 253 21 19. 28020 - MADRID. 



Entrada por 
jardines 



■ 



GRAFICOS EN ALTA RESOLUCION 
PARA EL COMMODORE 64 (II) 



El primer capitulo de esta serie ter- 
minaba con una rutina misteriosa. En- 
contrando el simbolo @ sera capaz de 
reconocer que esta ante una de las nue- 
vas palabras clave no disponibles ini- 
cialmente en el ordenador. 

Pasemos al analisis de la rutina cn 
cuestion. En primer lugar, el registro 
X es puesto a cero y se compara el 
contenido del acumulador (A) con las 
letras contenidas en una tabla, que co- 
mienza en la direccion $CF00. Cuan- 
do encuentra una coincidencia el pro- 
cesador bifurca hacia el principio dc la 
siguiente rutina, situada en la direc- 
cion $C061. 

Si, por el contrario, no encuentra la 
coincidencia, se compara el numero 
$0D con el byte procedcnte de la ta- 
bla. Ese OD se coloca para indicar el 
final de una palabra. Una vez que lo 
encuentra, el procesador salta hacia 
adelante (a STOP), incrementando en 
uno al registro X y el numero de pa- 
labra correspondiente en la tabla, que- 
dando registrado en la direccion $FE. 
El mismo byte es suministrado por 
CHRGOT, saltando el procesador ha- 
cia atras, al principio de la rutina 
($€041), Asi comienza la compara- 
cion con la siguiente palabra de la ta- 
bla. 

Si no encontrase un SOD, se compa- 
ra el byte de la tabla con 1, que indica 
el final de la misma. Una vez hallado 
el 1, el procesador bifurca hacia la ru- 
tina de salida, en la direccion $CF00. 

Si la letra situada en el acumulador 
(A) no coincide con una de la tabla y 
la tabla no ha alcanzado el final de una 
palabra, resulta incrementado el regis- 
tro X (que actua como contador en 
este caso) saltando el procesador para 
comprobar de nuevo. 

Una vez localizada la primera letra 
de un comando grafico, debe ser com- 
probado el resto de letras de la nueva 



palabra clave, para ver si coincide con 
la de ia tabla. En caso contrario se ob- 
tiene un mensaje de error de sintaxis. 

*=$c061;ORG49249 
ENC INX 

LDA #$QD 

CMP $CF00,X 

BEQ SC089 

LDA #$01 

CMP $CF00,X 

BEQ SC089 

JSR $0073 

CMP $CF00 / X 

BEQ ENC 

LDY $FB 

STY $7A 

LDY $FC 

STY $7B 

LDA $FE 

CMP #$16 

BEQ $C0A4 

J MP $C046 



C061 E8 A9 OD DD 00 CF F0 20 

C069 A9 01 DD 00 CF F0 19 20 

CD71 73 00 DD 00 CF F0 E9 A4 

C079 FB 84 7A A4 FC 84 7B A5 

C081 FE C9 16 F0 1E 4C 46 CO 



10 T=0 

20 FOR 1=49249 TO 49288 
30 READ A 
40 POKE I, A 
50 T=T+A 
60 NEXT I 

70 IF T<>5615 THEN PRINT 

"ERROR EN LAS DATA" 
100 DATA 232,169,13,221,0, 

207,240,32,169,1 
110 DATA 221,0,207,240,25, 

32,115,0,221,0 
120 DATA 207,240,233,164, 

251 ,132,122,164,252,132 
130 DATA 123,165,254,201,22, 

240,30,76,70,192 



Lo primero que se comprueba es la 
existencia de un $0D o un 1 en el si- 
guiente byte de la tabla, Naturalmen- 
te que no se encontrara a ninguno cn 
la primera pasada, pero est as instruc- 
ciones forman parte de un bucle. 
Cuando se encuentra cualquiera de 
ellos, se termina la comprobacion y el 
procesador salta a la rutina que calcu- 
la que otra rutina es la necesaria para 
continuar. 

El siguiente byte del programa es- 
crito en BASIC se obtiene nuevamen- 
te partiendo de la rutina CHRGET, 
siendo comparado con el byte de la ta- 
bla. Si coinciden, el procesador vuel- 
ve al comienzo de esta rutina, compro- 
bando el siguiente byte. 

En caso negative, el puntero dc! 
byte del BASIC es cargado en la va- 
riable del sistema adecuado. El nume- 
ro de palabra depositado en la direc- 
cion $FE es comparado con 22 ($16), 
para ver si han sido comprobadas to- 
das las palabras. Si lo han sido, con 
BEQ $C0A4 se salta hacia la rutina de 
salida. De otra forma sc vuelve a 
$C046, que esta marcada con la eti- 
queta OTRVEZ en la rutina, para co- 
menzar otra vez las comprobaciones. 



^QUE RUTINA? 

Ahora el programa salta a la rutina 
correcta, para desarrollar el comando 
grafico, 

*=$C089;0RG49289 

LDX #$01 

LDY #$00 
SOMA CPX $FE 

BEQ SC097 

INX 

INY 

INY 

JMP SUMA 
LDA $C0C0,Y 
STA $FD 
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C6c fige mfiqui 



LDA SC0C1 ,Y 
STA $FE 
JMP (SOOFD) 
LDX #$0B 
J MP ($0300) 



C089 A2 01 AO 00 E4 FE F0 06 

C091 E8 C8 C8 4C 8D CO B9 CO 

C099 CO 85 FD B9 C1 CO 85 FE 

C0A1 6C FD 00 A2 OB 6C 00 03 



10 T=0 

20 FOR 1=49289 TO 49320 
30 READ A 
40 POKE I, A 
50 T=T+A 
60 NEXT I 

70 IF T<>4649 THEM PRINT 

"ERROR EN LAS DATA" 
100 DATA 162,1,160,0,228, 

254,240,6,232,200 
'10 DATA 200,76,141,192, 

185,192,192,133,253,185 
'20 DATA 193, 192,133,254, 

108,253,0,162,11 ,108 
'30 DATA 0,3 

Los registros X e Y son inicializa- 
ios e incrementados, hasta que el nu- 
mero de palabra depositado en $FE 
.'oincida con el valor de X. Entonces 
el valor calculado en Y se utiliza como 
:iustc» para leer por toda la tabla 
que empieza en $C0C0, calculando la 
lireccion de la rutina que se encarga- 
de esa instruccion. La direccion ini- 

11 de la rutina esta almacenada en las 
:::ecciones $FD y $FE. JMP ($00FD) 
salta hacia la rutina que acabamos de 

"mentar. 

LDX # SOB y JMP ($0300) hacen la 
llamada a una pequena rutina de sali- 
da cuando la palabra del programa no 
se ajusta a ninguna de las que apare- 
n en la tabla. La rutina a la que 
unta $0300 u $0301 devuelve el 
~iensaje de error del BASIC, especi- 
ficado por el numero que se encuen- 
tra en el registro X. 

LA TABLA DE RUTINAS 

Aquf van las direcciones de inicio de 
rutinas. 



*=$COC0;ORG49344 
.W0R SC100 
.WOR SC130 
.WOR SCE00 
.WOR $CE00 
. WOR $CE00 
. WOR SCE00 



.WOR SCE00 

.WOR SCE00 

.WOR $CE00 

.WOR $CE00 

.WOR SCE00 

.WOR SCE00 

.WOR $CE00 
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.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 
.WOR SCEOO 



COCO 00 C1 30 C1 00 CE 00 CE 

C0C8 00 CE 00 CE 00 CE 00 CE 

CODO 00 CE 00 CE 00 CE 00 CE 

C0D8 00 C8 00 C8 00 C8 00 C8 

COEO 00 CE 00 CE 00 CE 00 CE 

C0E8 00 CE 00 CE 



10 T=0 

20 FOR 1=49344 TO 49387 
30 READ A 
40 POKE I, A 
50 T=T+A 
60 NEXT I 

70 IF T04554 THEN PRINT 

"ERROR EN LAS DATA" 
100 DATA 0,193,48,193,0, 

206,0,206,0,206 
110 DATA 0,206,0,206,0,206, 

0,206,0,206 
120 DATA 0,206,0,206,0,206, 

0,206,0,206 
130 DATA 0,206,0,206,0,206, 

0,206,0,206 
140 DATA 0,206,0,206 

En el presente artfculo solamente 
abordaremos dos de los comandos 
graficos. El resto seran tratados en si- 
guientes capi'tulos. Por eso unicamen- 
te aparecen dos direcciones de co- 
mienzo de rutinas activas en la ta- 
bla-$C130 y $C100. Por el raomento, 
si son encontradas otras palabras, se- 
ran dirigidas a una rutina temporal 
ubicada en $CE00. La direction de co- 
mienzo de las otras rutinas graficas se- 
ran escritas cuando tratemos con cada 
una de ellas. 



LA RUTINA @ COLOUR 



Esta parte del programa realiza va- 
rias Uamadas a la ROM. JSR $B79B 
salta a la subrutina que atiende al pri- 



mer parametro que va tras el coman- 
do COLOUR. Estc es transferido des- 
de el registro X al acumulador y alma- 
cenado en la direction de Entrada/Sa- 
lida que controla el color de la panta- 
lla. 

*=$C100;0RG49408 
JSR SB79B 
TXA 

STA SD021 
JSR SAEFD 
JSR SB79E 
TXA 

STA SD020 
LDX SC00E 
J MP S0079 



C100 20 9B B7 8A 8D 21 DO 20 
C108 FD AE 20 9E B7 8A 8D 20 
C110 DO AE 0E CO 4C 79 00 



10 T=0 

20 FOR 1=49408 TO 49430 
30 READ A 
40 POKE I, A 
50 T=T+A 
60 NEXT I - 

70 IF T02818 THEN PRINT 
"ERROR EN LAS DATA" 

100 DATA 32,155,183,138, 
141 ,33,208,32,253,174 

110 DATA 32,158,183,138, 
141,32,208,174,14,192 

120 DATA 76,121,0 

La rutina de la ROM que comienza 
en SAEFD trata con las comas. En 
este caso se ignora la coma y es lei'do 
el siguiente parametro, llamado en 
$B79E. Los tres primeros bytes de esa 
rutina lo desplazan hasta el siguiente 
byte, pero aqui no es necesario, ya 
que la rutina de la coma ya lo ha he- 
cho. El byte es almacenado en la di- 
rection que controla el color del bor- 
de. Entonces es cargado el estado de 
error en X y el procesador sale del 
programa por via de la rutina de men- 
saje de error. 



LA RUTINA @ HIRES 

El registro de control del chip VIC 
es puesto en modo «mapa de bits» (o 



@ HIRES), mediante las instruccio- 
nes LDA #$3B y STA $D011. Las 
cuatro instrucciones siguientes prepa- 
ran el registro de control de memoria 
del VIC, cambiandolo de 21 a 24, para 
trabajar en alta resolution. 

*=$C130;0RG49456 

LDA #$20 

STA SFE 

LDA #$00 

STA $FD 
BUC1 LDY #$00 
BUCLE STA ($FD),Y 

INY 

CPY #$00 
BNE BUCLE 
INC $FE 
LDX SFE 
CPX #$40 
BNE BUC1 
LDA #$3B 
STA $D011 
LDA $D018 
0RA #$08 
STA $D018 
JSR $B79B 
TXA 

AND #$0F 
ASL A 
ASL A 
ASL A 
ASL A 
STA $02 
JSR SAEFD 
JSR $B79E 
TXA 

AND #$0F 
CLC 

ADC $02 
STA $02 
LDA $02 
LDY #$00 
REPITE STA $0400, Y 
STA $04FA,Y 
STA $05F4,Y 
STA $06EE,Y 
INY 

CPY #$FB 
BNE REPITE 
LDA #$60 
STA $C23E 
JSR $C208 
LDA #$4C 
STA $C23E 
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LDA #$C8 
STA $D016 
LDX SCOOE 
J MP $0079 







C-U 




r c 


M7 


nn 

uu 




r u 


a L I JO 




nn 


7 I 


r v 


co 


rn 

uu 


nn 

uu 


nn 

uu 


:CU0 


F9 


E6 


FE 


A6 


FE 


EO 


40 


DO 


: C1 48 


EF 


A9 


3B 


8D 


11 


DO 


AD 


18 


:C150 


DO 


09 


08 


8D 


18 


DO 


20 


9B 


:C158 


B7 


8A 


29 


OF 


OA 


OA 


OA 


OA 


:C160 


85 


02 


20 


FD 


AE 


20 


9E 


B7 


:C168 


8A 


29 


OF 


18 


65 


02 


85 


02 


:C170 


A5 


02 


AO 


00 


99 


00 


04 


99 


:C178 


FA 


04 


99 


F4 


05 


99 


EE 


06 


:C180 


C8 


CO 


FB 


DO 


EF 


A9 


60 


8D 


: C1 88 


3E 


C2 


20 


08 


C2 


A9 


4C 


8D 


:C190 


3E 


C2 


A9 


C8 


8D 


16 


DO 


AE 


:C198 


0E 


CO 


4C 


79 


00 









T=0 

FOR 1=49456 TO 49564 
READ A 
POKE I, A 
T=T+A 
NEXT I 

IF TO13240 THEN PRINT 
"ERROR EN LAS DATA" 
DATA 169,32,133,254, 
169,0,133,253,160,0 
110 DATA 145,253,200,192,0, 
208,249,230,254,166 
DATA 254,224,64,208, 
239,169,59,141,17,208 
DATA 173,24,208,9,8, 
141,24,208,32,155 
DATA 183,138,41,15,10, 
10,10,10,133,2 
150 DATA 32,253,174,32,158, 
183,138,41,15,24 
DATA 101,2,133,2,165,2, 
160,0,153,0 
DATA 4,153,250,4,153, 
244,5,153,238,6 
DATA 200,192,251,208, 
239,169,96,141,62,194 
DATA 32,8,194,169,76, 
141 ,62,194,169,200 
DATA 141,22,208,174,14, 
192,76,121 ,0 



10 
20 
30 
40 
50 
60 
70 

100 



120 



130 



140 



160 



170 



180 



190 



200 



Despues es introducido el siguiente 
parametro, pasado al acumulador (A) 



y almaccnado en $0286-Ia variable del 
sistema que contiene cl codigo de co- 
lor de fondo en cada instante dado. 
Seguidamente es controlada la presen- 
cia de una coma, saltando sobre el I a 
para continuar leyendo el siguiente 
parametro. 

A continuation se carga la condi- 
tion del codigo de error en el registro 
X y el procesador abandona el progra- 
ma por via de la rutina de visualiza- 
tion de error. 

RUTINA DE IMUEVA PALABRA 

Esta rutina devuelve el mensaje de 
error. 

La rutina que comicnza en la direc- 
tion $FFD2 sc encarga de visualizar 
en pantalla el caracter cuyo numero se 
encuentra en el acumulador. 

*=$CE00;ORG52736 
LDX #$00 
LDA $CE13,X 
JSR $FFD2 
INX 

CPX #$12 
BNE $CE02 
LDX $C00E 
J MP $0079 

.BYTE 1 NO. . . IMPLEMEN 
TADO' 

CE00 A2 00 BD 13 CE 20 D2 FF 
CE08 E8 E0 12 DO F5 AE 0E CO 
CE10 4C 79 00 4E 4F 2E 2E 2E 
CE18 49 4D 50 4C 45 4D 45 4E 
CE20 54 41 44 4F 

10 T=0 

20 FOR 1=52736 TO 52771 
30 READ A 
40 POKE I, A 
50 T=T+A 
60 NEXT I 

70 IF T<>3767 THEN PRINT 

"ERROR EN LAS DATA" 
100 DATA 162,0,189,19,206, 

32,210,255,232,224 
110 DATA 18,208,245,174,14, 

192,76,121,0,78 
120 DATA 79,46,46,46,73,77, 

80,76,69,77 
130 DATA 69,78,84,65,68,79 



LA TABLA EN ASCII 



Esta tabla alberga a todas las pala- 
bras clave enforma de datos corres- 
pondientes al codigo ASCII. Cada pa- 
labra termina con un byte $0D y el fi- 
nal de la tabla lo hace con $01. 



*=$CF00;ORG52992 
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RYTF 
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RYTF 
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1 TCCTl 

- 1 CO J 


RYTF 




R YTF 
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RYTF 


son 


RYTF 

■ O 1 1 L 


' RF f 1 


RYTF 

• D M L 




RYTF 
- d i i n. 




RYTF 
■ □ II c 




RYTF 

*D 1 1 L 


1 TP YT 1 
1 tA 1 


DVTC 




■ BYTE 


ARC 1 


■ BYTE 


SOD 


-BYTE 


1 ANGL 1 


-BYTE 


SOD 


-BYTE 


•CIRCLE 1 


-BYTE 


$DD 


-BYTE 


'DRAW 


■ BYTE 


SOD 


■ BYTE 


'ROT' 


■ BYTE 


SOD 


■ BYTE 


•FLASH 1 


■ BYTE 


SOD 


-BYTE 


'OFF 1 


-BYTE 


SOD 


-BYTE 


$01 



CF00 43 4F 4C 4F 55 52 0D 48 
CF08 49 52 45 53 0D 4D 55 4C 
CF10 54 0D 4E 52 4D 0D 4C 4F 
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: CF18 


57 


43 


4F 


4C 


OD 


48 


49 


43 


: CF20 


4F 


4C 


OD 


50 


4C 


4F 


54 


4C 


: CF28 


49 


4E 


45 


OD 


54 


45 


53 


54 


: CF30 


OD 


43 


53 


45 


54 


OD 


52 


45 


: CF38 


43 


OD 


43 


48 


41 


52 


OD 


54 


:CF40 


45 


58 


54 


OD 


41 


52 


43 


OD 


:CF48 


41 


4E 


47 


4C 


OD 


43 


49 


52 


:CF50 


43 


4C 


45 


OD 


44 


52 


41 


57 


:CF58 


OD 


52 


4F 


54 


OD 


46 


4C 


41 


:CF60 


53 


48 


OD 


4F 


46 


46 


OD 


01 



10 T=0 

20 FOR 1=52992 TO 53095 
30 READ A 
40 POKE I, A 
50 T=T+A 
60 NEXT I 

70 IF T<>6621 THEN PRINT 

"ERROR EN LAS DATA" 
100 DATA 67,79,76,79,85,82, 

13,72,73,82 
110 DATA 69,83,13,77,85,76, 

84,13,78,82 
120 DATA 77,13,76,79,87,67, 

79,76,13,72 



130 DATA 73,67,79,76,13,80, 

76,79,84,76 
140 DATA 73,78,69,13,84,69, 

83,84,13,67 
150 DATA 83,69,84,13,82,69, 

67,13,67,72 
160 DATA 65,82,13,84,69,88, 

84,13,65,82 
170 DATA 67,13,65,78,71,76, 

13,67,73,82 
180 DATA 67,76,69,13,68,82, 

65,87,13,82 
190 DATA 79,84,13,70,76,65, 

83,72,13,79 
200 DATA 70,70,13,1 

COMPROBACION 

Empleando este programa en BA- 
SIC con comandos graficos, puedes 
comprobar que tu programa funciona: 

10 3HIRES 0,1 

20 FOR Z=8192 TO 16191 STEP 

5:P0KE 2,255:NEXT Z 
30 FOR Z=0 TO 15:3C0L0UR Z,Z 



.-NEXT Z: GOTO 30 

Basta con teclear SYS 49152, para 
que se ejecute la rutina. 



En los casos en que se mani- 
pule la pantalla utilizando los 
comandos graficos de INPUT, 
los programas en BASIC mas 
largos de 6 Kbytes no podran ser 
ejecutados. Es por ello que los 
programas de tales caracteristi- 
cas que publiquemos seran mas 
cortos de esa longitud. De todas 
formas, si quisieras escribir so- 
brepasando este li'mite, tcndras 
que dcsplazar el area de memo- 
ria del BASIC al otro lado del 
area de la pantalla. Esto se con- 
sigue con los siguicntes POKEs: 
POKE 43,1: POKE 44,65: 
POKE 54*256,0: NEW que pro- 
porciona 24 K de memoria libres 
para contener tu programa. 



[ Para que su 
COMMODORE trabaje 



casa/ de 
software 



CONTABILIDAD-64 



Lider en ventas, por su scncillez, 
rapidez, eficacia y prccio. 
Tiene capacidad para 600 cucntas 
y un numero ilimitado de apuntes 
por cuanto el programa permite 
generar nuevos discos en los que 
continuar el ejercieio contable. 



Contabilidad-64 es un producto 
de software autosuficiente 
que permite tener en todo 




momento acceso a los 
ficheros de manera que 
puedan modificarse los datos 
contenidos en ellos, aun 
uando estos ya hayan sido 
validados; esta posibilidad 
da una total libertad al 
usuario en el manejo 

de la informacidn. 

Version A: 300 Cuentas. 
Impresoras COMMODORE. 

Version B: 600 Cuentas. Impresoras 
Centronics y COMMODORE. 

P.V.P. Version A: 23.000,- pts. 
RV.P. Version B: 25.000,- pts. 



3 - Diario d« C'M" F1C HF.ROS 
« M vNTENlMlF> T0Dfcl 

- ' L 1-Parameiros 
3 . Asietitos 

: ?:.„.i,do lie asientos 
6 - programacion u ^ 



□ Dcseo recibir information de los siguicntes programas: 



Adquieralos en cualquier 

establecimiento autorizado nueva direccion: ' 1 Deseo r€cibir contra reembolso los siguicntes programas: 

O directamente a: c/ Taquigrafo Serra, 7, 5* planta. ■ — 

Tels. 321 96 36 Nombre: . 

Casa de Software, s.a. 321 97 58 Direccion: - 

08029 BARCELONA Pob laci6n: .... 



INPUT 49 






JUEGO 
LA VIM 



■ 


LAS REG LAS DE LA VIDA 


■ 


PATRON INICIAL 


■ 


UN CONTADOR DE 


GENERACIONES 


■ 


CREACION DE LA COLONIA 



Cuentale a tu microordenador unas 
cuantas reglas sencillas y podras si- 
mular el comportamiento de los orga- 
nismos unicelulares. EI truco de este 
juego consiste en establecer una su- 
pervivencia optima para la colonia. 

En este juego la pantalla del televi- 
sor representa al mundo en el que 
pueden vivir, multiplicarse y moor 
las celulas. La pantalla queda dividi- 
da en cuadrados invisibles, cada uno 
de los cuales puede contener a una de 
las celulas. Si observamos el diagra- 
ma de la figura nos damos cuenta de 
que cada celula puede tener hasta 
ocho vecinos como maximo. Las re- 
glas de la vida determinan si una 
celula vive o muere o, incluso, si nace 
una nueva. 

Las reglas son: 

— Nacera una celula en un espacio 
en el que existan exactamente tres 
vecinos. 

— Una celula sobrevive hasta la 
siguiente generation si tiene dos o 
tres vecinos. 

—El resto de las celulas muere. 

El ordenador utiliza estas reglas 
para determinar el futuro de cada 
cuadrado de la pantalla y muestra 
como evoluciona una colonia initial 
de celulas. 



Cada celula tiene otras ocho como 
vecinas, de ellas depende su futuro. 



Conseguir esto en BASIC seria te- 
rriblemente lento, por lo que el pro- 
grama esta desarrollado en eodigo 
maquina, permitiendo que cada nue- 
va generation pueda ser visualizada 
en aproximadamente un segundo. 

El programa tambien muestra en 
la pantalla a las sucesivas generatio- 
n's en un color diferente, por lo cual 
el efecto resulta bastante mesmeri- 
zante cuando observamos como se 
extiende la colonia original por la 
superficie, dividiendose en grupos 
mas pequenos, muriendo o rejuvene- 
ciendose. 

La conformation de la colonia ini- 
tial es de importancia crucial, pues 
resulta que algunos patrones condu- 
cen a la muerte tras la existencia de 
solo unas pocas generaciones, mien- 
tras que otros perduran a lo largo de 
centenares, Tu trabajo consiste en 
introducir las celulas que componen 
la colonia inicial cuyos individuos 
pueden reproducirse y morir. 

Uno de los objetivos de este juego 
es disenar un patron de partida que 
sobreviva durante el mayor numero 
de generaciones. Con este fin existe 
un contador de generaciones que te 
mantiene informado sobre lo bien 
que lo esta haciendo tu colonia. Pero 
tal vez puede ser mas interesante 
crear un colonia que se desarrolla de 
manera intrigante. Las fotos de pan- 
tallas que acompanan al articulo 
muestran unos cuantos patrones ob- 
tenidos. 

CREACION DE UNA COLONIA 

A continuation se exponc como 
introducir el patron inicial, es decir 
la colonia original. Para esto se utili- 
zan las teclas de movimiento del 
cursor para desplazarse por toda la 
pantalla. La bar ra esp aciadora para 
crear una celula, [del] para borrarla 




El programador define la colonia o 
con junto de ellas a su criteria, con el 
fin de que permanezcan con vida el 
mayor numero de generaciones. 



OOP OOO 
QOO 000 
00 p 



Al caho de varias generaciones ya es 
factible estimar si la colonia tiene 
posibilidades de perdurar. En el caso 
de varias podrian fundirse. 



pot) DO 

o oo oo 

00 o 

oo o oo 
d o 

000000 

o o odoo 
oo o o o 

QOOO OO 



RETURN 



para termmar. 



La suerte esta echada. Han nacido 
muchas celulas, otras son viejas 
y muchas se juegan el futuro a cava 
o cruz. 
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PERSONAL PRINTER 



=ii7=iwi c+; 



BUILT-IN COMMODORE INTERFACE 




ESPECIFICACIONES 

1. Metodo de impresion 

Serie de impactos por matriz 
de 9x9 

2. Cabezal impresor 

9 agujas (reemplazable) con 
expectativa de vida de 50 
miNones de caracteres a 
100 % de use continuo. 

3 Vefocidad de impresion 

ImpresEon a 105 cps uni o 
bi-direccional, busqueda 
logica optimizada, capacidad 
de impresion 45 Ipm a 10 
cpi., 200 ms de salto de llnea 
con espaciado de 1/6". 

4. Espaciado interlines 

1/6", 1/8", 7/72", prog ram able 
N/72", N/216". 

5. Alimentacion de papel 

a) Tractor a]u stable entre 4" 
y 10". 

b) Alimentacion a friccidn 
para hojas sueltas entre 
4" y 9,5". 

6. Corte de papel 

Se puede impnmir desde 
principio de pagfria hasta una 
pulgada de fin de papel. 

7 Seleccidn de caracteres 

96 caracteres ASCI!, 96 
italicos, 82 caracteres 
graficos Commodore. 
Definjcron de caracteres por 



usuario a traves de software 
facilmente. 

8, Graficos 

Normal 480 puntos por linea. 
Doble densidad 960. 

9. Mod os de impresion 

Modo Commodore 
Standard, reverse (negativo), 
mayusculas y minusculas y 
caracteres graficos. 
Modo plus 

Standard, doble impresion, 
enfatizado, itafica, supra y 
subindices mitad altura, 

10 Tamahos de impresion 

Modo Commodore 

a) Normal 

b) Expandido 

c) Expandido doble 

d) Expandido triple 

e) Expandido cuadruple. 
Modo plus 

a) Normal (10 cpi), 2,1 mm 
(a)x2,55 mm(h), 

b) Normal expandido (5 cpi) 

c) Compnmido {17 cpi) 

d) Comprimido-expandido 
(8,5 cpi). 

1 1 . Test escritura 

Manteniendo apretado LF 
(salto de linea) cuando se 
acciona e! interruptor de 
puesta en marcha ON. 

12. Subrayado continuo. 

13. Tabulador 

Existen 32 posiciones de 
tabulation por linea. 



14. Longitud de formato 

El standard de 66 lineas. con 
espaciado de lineas y 
longitud del formato 
programable. 
VFU electrico. 



15, 



Tamano buffer 

1 llnea standard. 



16 Diagnostico de deteccron 
de errores en modo 
Commodore. 

17. Posicionador de papef 
continue 

Desplazable parte anterior o 
posterior. 

18, Interface 

Directo a Commodore salida 
RS232 a traves de conector 
DIN (el cable se suministra 
con la impresora). 
1 9 Grosor papel 

Maximo 2 copias, 40 g/m 2 
peso continue, sensor papel. 

20. Operacion con 
interruptores 
De facil acceso. 

21. Caracteres por Mnea 
Normal: 80 

Normal expandido: 40 
Comprimido: 132 
Comprimido expandido: 66 

22. Cinta impresora 
Autorretintada, mediante 
tampon interno f cartucho 
compacto de cinta negra 
facilmente reemplazable y 
bajo coste. 



23 Tamano 

115 (h) x 275 (0 x 405 (a), 

24. Tension alimentacion 

220 v/ 50 Hz. 

25. Entrada de paper 

Frontal-horizontal. 



26, 



27. 



28 



fletroceso 

Por software. 

fnstrucciones de 
formateado de tablas 
aifanumericas 



Elevadores inferiores 
standard 

(para ubicacion del papel 
continuo debajo de la 
impresora). 

29. Motor: paso a paso 

30. Indrcadores: 

• Conexion generaf 

• Fin de papel 

• On line 

31. Interruptores 

ON/OFF, On line (SEL), salto 
de pagma (FF), salto de linea 
(LF). 

32 Compatible con la mayor 
parte de software existente 

(incluso Commodore). 



fiePflESeHTACION EN ESPANA DE= 

-IMPRESOEAS PROFeSIONAlES- 



DATA M O N , S. A, 

• PERIFERICOS ORDENADORES 

• IMPRESORAS Y MONITORES 

• CONEXIONES Y ACCESORIOS 



TO DAS LAS ESPECIFICACIONES PUEDEN SER CAMBIADAS SiN PREVIO AVISO. * Commodore es marca regrstrada de Commodore Busses Machine. Inc. 



PROV6NZA, 38S-3BT, 6. = , 1 [ 
TEL£FONO (93) 20T 



20 



5 FOR Z=0 TO 278: READ 
X:POKE 

49152+Z,X:CO=CO+1 : 
NEXT Z 

6 IF C0O279 THEN 
PRINT"ERROR EN LAS 
DATA": STOP 

10 POKE 53280,6: POKE 

53281,0: POKE 198,0 : POKE 
2,1 

PRINT"na " : FOR Z=0 TO 
39: POKE 1024+Z, 160: POKE 
1984+Z,160 
25 POKE 55296+Z,14:P0KE 

56256+Z,14:NEXT Z 
30 X=500:C=32 
35 N=0:FOR Z=1064 TO 
1064+22*40 STEP 40 
POKE 

832+N,Z-(INT(Z/256)*256) 
:POKE 857+N,Z/256 
N=N+1 :NEXT Z 
GET A$ 
105 POKE 1024+X,C:IF 

A$=CHR$(13) THEN POKE 
198,0: GOTO 200 
IF A$="ll" AND X-1>39 
THEN X=X-1 

IF A$="M" AND X+K960 
THEN X=X+1 

IF A$="n" AND X-40>39 
THEN X=X-40 

IF A$="M" AND X+40<960 
THEN X=X+40 




40 



45 
100 



110 
120 
130 
140 



150 C=PEEK(1024+X) :POKE 

1024+X,102:POKE 

55296+X,3 
160 IF AS- '□" THEN C=87 
170 IF A$=CHR$(20) THEN C=32 
180 GOTO 100 

190 PRINT"aa";NU:NU=NU+1 :SY 
S 49152:IF PEEK(197)<>64 
THEN RUN 10 

200 GOTO 190 

210 DATA 169,0,133,251,32, 
159,192,166,251,189, 
64,3,133,252,133,254, 
189 

220 DATA 89,3,133,253,24, 
105,190,133,255,160,0, 
177,252,201,32,208 

230 DATA 16,200,192,40,208, 
245,230,251,165,251, 
201,23,208,216,76,178, 
192 

240 DATA 224,0,240,12,192, 
0,240,8,192,39,240,4, 
224,23,208,3,76,34,192 

250 DATA 136,177,254,24, 
105,1,145,254,200,200 
177,254,24,105,1,145, 
254 

260 DATA 136,136,166,251, 
202,189,64,3,133, 
252,189,89,3,24,105, 
190,133 

270 DATA 253,32,15,193, 
200,32,15,193,200, 
32,15,193,232,232, 
189,64,3,133 



280 DATA 252,189,89,3,24, 
105,190,133,253,136, 
136,32,15,193,200, 
32,15 

290 DATA 193,200,32,15,193, 
136,166,251,189,64,3, 
133,252,189,89,3,133, 
253 

300 DATA 76,34,192,162,0, 
138,157,40,194,157,0, 
195,157,0,196,157,0, 
197,232 

310 DATA 208,241,96,162, 
0,189,64,3,133,252, 
133,254,189,89,3,133, 
253,24 

320 DATA 105,190,133,255, 
160,0,177,254,201,2, 
144,21,201,2,240,39, 
201,4 

325 DATA 176,13,177,252 

330 DATA 201,87,240,29, 
169,87,145,252,76, 
230,192,169,32,145, 
252,165,253 

340 DATA 24,105,212,133, 
253,165,2,145,252, 
165,253,24,233,211, 
133,253 

350 DATA 200,192,40,208, 
202,232,224,23,208, 
178,230,2,165,2,201, 
16 

360 DATA 208,4,169,1,133,2, 
96,177,252,24,105,1, 
145,252,96 



GANADORES DE LOS MEJORES DE INPUT 



En el sorleo correspondiente al numero 1 realizado entre quienes escribisteis mandando 
vuestros votos a LOS MEJORES DE INPUT han resultado ganadores: 



Joan Campderros Canas (Barcelona) 
Guillen Pera Blanco (Premia de Mar) 
David Barcena Hilario (Madrid) 
Xavier Parra Bernadet (Barcelona) 
Jorge Brenuy Casals (Lerida) 



Eduardo Quintana Coito (Barcelona) 
Maria Crespo Lora (Nazaret) 
Antonio Lopez Soto (Malaga) 
Xavier VI Vila y Capdevila (Solsona) 
Federico Murcia Descalzo (Sevilla) 



Lamagiaae... 



<5 Koala Pad 



Tabieta Grafica. 





La Tabieta Grafica 
KOALA PAD pone a tu 
alcance las inmensas 
posibilidades graficas del 
ordenador Commodore 
64. Te abre las puertas 
a un mundo de creatividad 
y diversion donde no hay 
mas limite que el de tu 
propia imagination. Disena y dibuja a mano 
alzada o utilizando la biblioteca de figuras 
geometricas. Con una paleta de 16 colores 
solidos que, mediante variaciones de trama, 
proporcionan hasta 1 28 combinaciones 
posibles. Con 8 "pinceles" distintos, zoom 
(efecto lupa) para retocar detailes, efecto 
espejo... Conserva tus dibujos en disco o 
cassette, Imprimelos o incluyelos en tus 
programas. 



Won KOALA PAD, elegido "Periferico del Ano' f 
en Estados Unidos, se suministra el programa KOALA 
PAINTER en disco y cassette y el Manual de Usuario, 
ambos totalmente traducidos al castellano. 



I ademas, como Obsequio Especial, los programas: 

KOALA PRINTER (cassette) para sacar por impresora las imagenes 
creadas por el KOALA PAD. 

GUI A INSTANTANEA PARA EL PROGRAMADOR (cassette), una utilisima 
coleccion de herramientas de programacion para que en tus programas 
puedas incluir la utilizacion del KOALA PAD: creation de cursores en alta 

resolution, zonas "sensibles" en pantalla, menus, teclas 
programables, "sprites", generation de tonos 
musicales... 




& Koala Pad 



Tabieta Grafo 



ICPD 



S 



P.° de la CastelJana, 179. 28046 MADRID. Telefono: 442 54 33, 




ApHcaciones 



CONFIGURA LA HOJA 
DE TRABAJO (II) 



■ 


PLANEANDO LA HOJA 


DE TRABAJO 


■ 


USOS GENERALES 


■ 


FACTURAS 


■ 


INVENTARIOS 



Mira adonde va a parar tu dinero, o 
planifica el futuro de tu negocio con 
este util programa de hoja de trabajo. 
Agrega unas cuantas Hneas al progra- 
ma iniciado el mes pasado. 

Ya que una hoja de trabajo al prin- 
cipio es como una hoja de papel en 
bianco (o una pantalla en bianco), a 
veces es dificil saber exactamente para 
que utilizarla. Los ejemplos dados el 
mes pasado, y las ideas que siguen te 
ayudaran, de forma que podras confi- 
gurar tu hoja para tus propias necesi- 
dades. Y naturalmente no tienes por 
que limitarte a una sola hoja. El pro- 
grama se puede utilizar para crear 
cualquier numero de hojas que pue- 
den ser almacenadas y llamadas en 
cualquier momento. 

Aqui tienes algunos ejemplos. Po- 
drias tener una hoja para apuntar y 
planificar tus gastos domesticos, cuyas 
entradas man encabezadas por rotulos 
tales como pagos, hipotecas, seguros, 
reparaciones, etc. Pero si tienes que 
hacer muchas reparaciones, es posible 
que prefieras mantener una hoja sepa- 
rada para ellas. Podrias etiquetar los 
diferentes tipos de reparaciones, asi 
ocmo la decoration y los muebles de 
las distintas habitaciones, mostrando 
cuanto se ha gastado cada mes o cada 
trimestre. El programa podria totali- 
zar el gasto para cada tipo de repara- 
cion en toda la casa, o el gasto total 
por habitacion. 

Otra hoja podria contener todos los 
gastos generates de la familia, tales 
como comida y bebida, ropa ? coches, 
vacaciones y diversiones. Podria listar 
todos estos articulos por semanas o 
por mescs, o para diferentes miem- 
bros de la familia. 

Dado que la hoja de trabajo esta 
completamente en bianco al empezar, 
puedes utilizarla para cualquier infor- 
macion, la cual ha de ser introducida 
de una forma logica. Por ejemplo, la 



hoja de trabajo para los socios de un 
club puede listar sus nombres 7 nume- 



ros y cuotas de suscripcion, asi como 
las asistencias semanales, empleando 
etiquetas en casi todas las entradas. 

Una hoja de trabajo resulta tambien 
ideal para introducir detalles en un in- 
fo rme. De hecho una hoja de trabajo 
es como una version mucho mas sofis- 
ticada de array bidimensional, permi- 
tiendote un control mucho mayor so- 
bre la forma en que se hacen las en- 
tradas asi como sobre la inclusion de 
ecuaciones, cuyos resultados se calcu- 
lan y presentan inmediatamente. 

Las aplicaciones comerciales son 
mas evidentes y virtu almente ilimita- 
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Iicaciones 



das. Las hojas de trabajo pueden con- 
tend detalles de facturas, caractensti- 
cas de artfculos junto a su coste, IVA, 
descuentos, etc. Pueden servir para 
elaborar los salarios del personal, lis- 
tando los nombres de los trabaj ado- 
res, horas trabajadas, sueldo, subsi- 
dios e impuestos. Tambien se pueden 
utilizar para la gestion de stocks, para 
la contabilidad o para la confection de 
presupuestos, incluyendo la elabora- 
eion de pronosticos alternatives para 
el futuro pulsando una simple tecla. 

INTRODUCCiON DEL PROGRAMA 

La seccion de programa que sigue a 
continuation enlaza con la que presen- 
:araos en el numero anterior. El resto 
jparecera en un proximo articulo, que 
tambien contendra instrucciones deta- 
Uadas sobre la forma de usar el pro- 
grama. Carga pues la primera parte 



(con LOAD), anadele estas lineas y 
almacenalas (SAVE) listas para la 
proxima vez en que ya podras ejecu- 
tar el programa completo. 



I^yigm para Com mod ore -64 

860 A$=A$+"CESPACI0:" 

870 A$=LEFT$(A$,LEN( A$)-1 ) 

880 IF RIGHT$(A$,1)='TESPA 

CIO]" THEN 870 
890 PS=1 :LN=LEN(A$) :K=0 
900 IF LN=1 AND A$="R" THEN 

Fl =3 :RETURN 
910 IF LN=1 THEN F1=0: 

RETURN 

920 IF LN=0 AND RIGHT$(D$(R, 
C) y 8)="C8*ESPACI0S]"THEN 
A$=CHR$(128) :F1=3:RETURN 

930 G0SUB 790 

940 PS=PS+1 + D1 

950 IF D1=0 THEN F1=0: RETURN 
960 IF PS<LN-1 THEN 930 



970 IF PS>LN THEN F1=3: 
RETURN 

980 Q1$=0P$:G2$=MID$(A$,PS„ 

1):G0SUB 2670 
990 IF Q=0 THEN F1=0:RETURN 
1000 D=VAL(RIGHT$(A$,1 ) ) 
1010 IF LN=PS THEN F1=3: 
RETURN 

1020 IF LN=PS+1 AND D>1 AND 
D<10 THEN F1 =3: RETURN 

1030 F1=0: RETURN 

1040 IF A$="" THEN RETURN 

1050 GOSUB 860 

1060 IF F1=0 THEN A$="": 

INPUT'TCRSRabajolESCRI 
BECCRSRderechan";A$: 
GOTO 1040 

1070 RETURN 

1080 PRINT"Q"SPC(16)"[CTRL+9 
DTRABAJ ANDOCCRSRaba joH " 
1090 FOR C=1 TO CM 
1100 FOR R=1 TO RM 
1110 D=0:F=0:0P=8 
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11?0 F$=LEFT$(D$(R,C),8) 
1130 C1=ASC(MID$(F$,1 ,1))-64 
1140 IF C1=64 OR Cl=-32 

THEN 1230 
1150 IF C1=18 THEN GOSUB 

1320: GOTO 1230 
1160 R1=VAL(MID$(F$,2,2)') :IF 

R1>9 THEN F=1 
1170 C2=ASC(MID$(F$,3+F))-64 

:IF C2=-32 THEN GOSUB 

1360: GOTO 1230 
1180 IF C2=-3 THEN D=VAL 

(MID$( F$,4+F,2) ) :G0SUB 

1360:G0T0 1230 
1190 R2=VAL(MID$(F$,4+F,2)) : 

IF R2>9 THEN F=F+1 
1200 Q1$=0P$:Q2$=MID$(F$,5+ 

F,1) :G0SUB 2670 
1210 D=VAL(MID$(F$,6+F,2)) 
1220 GOSUB 1360 
1230 NEXT R,C 
1240 RETURN 

1250 GET A$:IF A$="" THEN 
1250 

1260 IF A$<AA$ OR A$>BB$ 

THEN 1250 
1270 RETURN 

1280 GET A$:IF A$="" THEN 
1280 

1290 IF A$=AA$ THEN RETURN 
1300 IF A$=BB$ THEN RETURN 
1310 GOTO 1280 
1320 AA$=RIGHT$(D$(R,C),8) 
1330 IF RIGHT$(AA$,1)="CESPA 

CIO] " THEN AA$=LEFT$ 

(F$,7):G0T0 1330 
1340 D$(R,C)=LEFT$(D$(R,C), 

8)+AA$ 
1350 RETURN 

1360 V1=VAL(RIGHT$(D$(R1,C1) 

,8)) :V2=VALCRIGHT$(D$ 

(R2,C2),8)) 
1370 ON Q GOSUB 1420,1430, 

1440,1450,1460,1470, 

1510,1550 
1380 AA$=STR$(AN) :IF LEN 

(AA$)>8 THEN AA$="DEMA 

SIADO GRANDE" 
1390 IF LEN(AA$)<8 THEN AA$= 

"[ESPACIO] "+AA$:GOTO 

1390 

1400 D$(R,C)=F$+AA$ 
1410 RETURN 
1420 AN=V1+V2: RETURN 
1430 AN=V1-V2: RETURN 



1440 AN=V1*V2: RETURN 
1450 AN=V1/V2: RETURN 
1460 AN=V2*V1/1 00: RETURN 
1470 AN=0:FOR NN=R1 TO R2 
1480 AN=AN+VAL(MID$(D$(NN, 

CD, 9,8)) 
1490 NEXT NN 
1500 RETURN 

1510 AN=0:FOR NN=C1 TO C2 
1520 AN=AN+VAL(MID$(D$(R1, 

NN),9,8)) 
1530 NEXT NN 
1540 RETURN 
1550 AN=V1 : RETURN 
1560 PRINT"QUIERES ALMACENAR 

ESTOS DATOS (S/N)?" 
1570 AA$="S":BB$="N":GOSUB 

1280 

1580 IF A$="N" THEN RETURN 
1590 INPUT"sNOMBRE";NM$:OPEN 

1,1,1,NM$ 
1600 PRINT#1 ,RM:PRINT#1 ,CM: 

FOR R=1 TO RM 
1610 FOR C=1 TO CM 
1620 PRINT#1,CHR$(34)+D$(R, 

C)+CHR$(34) 
1630 NEXT C,R:CLOSE 1 :RETURN 
1640 PRINT"CSHIFT+CLR/HOME] 

CCRSRabajoDCCRSRderechaH 

QUIERES CARGAR" 
1650 PRINT'TCRSRderechalUN 

FICHERO EXISTENTE 

(S/N)?" 
1660 AA$=*'S":BB$="N":GOSUB 

1280 

1670 IF A$="N" THEN RETURN 
1680 INPUT"NOMBRE";NM$:OPEN 

1,1,0,NM$ 
1690 INPUT#1 ,RM,CM:FOR R=1 

TO RM: FOR C=1 TO CM 
1700 INPUT#1,D$(R,C) :NEXTC,R 
1710 CLOSE 1 : RETURN 
1720 S$=CHR$(13)+CHR$(145)+" 

C22*ESPACI0S:C22*SHIFT+ 

CRSRizquierda]" 
1730 W$="MAL MODO PARA 

RELATIVO " 
1740 GOSUB 590 
1750 IF A$="CFLECHAi zq.H" 

THEN RETURN 
1760 PRINT'TCRSRarriba] 

ABSOLUTO RELATIVO"; 
1770 AA$="A":BB$="R":GOSUB 

1280 

1780 IF TP=0 AND A$="R" THEN 



PRINT S$;W$;:FOR W=1 TO 
1000:NEXT 
1790 IF TP=0 AND A$="R" THEN 
RETURN 

1800 IF A$="A" THEN K1=0 
1810 IF A$="R" THEN K1=1 
1820 PRINT S$; 
1830 PRINT"COPIA EN FILA/ 

COLUMNA"; 
1840 AA$="C":BB$="F":GOSUB 

1280 

1850 IF A$="C" THEN K2=1 

1860 IF A$="F" THEN K2=0 

1870 PRINT S$; 

1880 PRINT'TSHIFT+CRSR 

arribaHDESDE COLUMNA 
CESPACIO^CCRSRderechaD"; 

1890 AA$="A":BB$="X":GOSUB 
1250 

1900 C1=ASCCA$)-64:PRINT A$ 

1910 INPUT"FILA";R1 

1920 IF RKO OR R1>GM THEN 
PRINT TAB(6)"CSHIFT+ 
CRSRarriba"; :GOTO 
1910 

1930 PRINT'TSHIFT+CRSRarribal 
HASTA[3*ESPACI0S3"; 

1940 IF K2=0 THEN AA$="A": 
BB$="W":GOSUB 1250:C2= 
ASC(A$)-64:PRINT A$; : 
R2=R1 

1950 IF K2=1 THEN C2=C1 : 

PRINT CHR$(C2+64) : INPUT 

"FILACESPACIOD; 

";R2 

1960 IF R2<R1 OR R2>RM THEN 
1950 

1970 ON Kl*2+K2+TP/2+1 GOSUB 
1990,2020,2070,2070, 
2080,2110,2140,2260 

1980 RETURN 

1990 GOSUB 2400 

2000 FOR NN=C1 TO C2: GOSUB 
2450:NEXT NN 

2010 RETURN 

2020 GOSUB 2400 

2030 FOR NN=R1 TO R2 

2040 A$=LEFT$(D$(NN,C1),8) : 
IF ASC(A$)=128 THEN A$= 
"CESPACIO]"+RIGHT$(A$, 
7) 

2050 D$(NN,C1)=A$+F$ 
2060 NEXT NN 
2070 RETURN 
2080 GOSUB 2410 
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2090 FOR NN=C1 TO C2:G0SUB 2470: NEXT NN 
2100 RETURN 
2110 GOSUB 2410 

2120 FOR NN=R1 TO R2:G0SUB 2440:NEXT NN 
2130 RETURN 

2140 GOSUB 2410:G0SUB 2420 

2150 FF=0:IF X1>9 THEN FF=1 

2160 AA$=MID$(F$,2,1+FF) 

2170 REM**CONTINUA EN EL SIGUIENTE 

'.ota: En aLgunos ejempLares de nuestra 
edicion anterior apareci eron cegados va- 
~ios caracteres graficos, debido a un 
exceso de tinta. Por elLo publi camos a 
continuacion La cor respondenci a de eL Los, 
escribiendo entre corchetes Las tecLas 
; sus combi naciones necesarias en cada 
-omento. 

_a operacion es senci LLa. Si se hubiera 
tecLeado La primera parte deL programa. 
Easta con cargar Lo desde La cinta o eL 
-isco y escribir di rectamente estas Li- 
-eas, que pasaran automati camente a 
sustitui r a Las anteriores. 

20 PRINT "cshift+clr/home:cctrl+4:[:crsr 

abajoD"SPC(16)"CCTRL+9]TRABAJAND0 
LCRSRabajo:"CHRS(8) 
'00 C$="CCRSRderecha]CSHIFT+CRSRizq.] 

CCRSRabajcaUSHIFT+CRSRarribalT+CHRS 

(133)+CHR$(137)+CHR$(134)+CHR$(13S) 

+CHRS(135)+CHR$(139) 
220 PRINT"CCLR/H0MEKCTRL+9:[:CTRL+5a 

CSHIFT+UKSHIFT+*:CSHIFT+*:"; 
280 PRINT"CCTRL+93CSHIFT+BDCC0HM.+13" 

RIGHT$(AA$,2>;:N=0 
300 PRINT'TCTRL+53 LSHIFT+BD LCTRL+0] " 

CHR$(CL(N)); 
350 PRINT"CCTRL+93CCTRL+5:[SHIFT+B]"; : 

NEXT R 

360 poke 198 # 0:print"cctrl+9:cshift+j1 
C2*shift+ckcomm.+e:c8*shift+c: 
ccomm.+e: c8*shift+c] cc0mm. + e3 l"8* 

SHIFT+aCCOMM.+ED E8*SHIFT+CJ CSHIFT+ 
KIT; 

370 PRINT"CCTRL+9D CESPACIOD CURSOR PARA 

DESPLAZAR:"; 
390 IF TP=0 THEN PRINT'TESPACIO] CCTRL+8] 

CESPACI01M0D0 VARIABLES [ESPACIO:! 

UCTRL+53CESPACIO: M ; 
640 PRINT"ESHIFT+CRSRizq.:"A$ 
690 PRINT"ENTRADACCRSRder .D"; 
750 IF LEN(A$)>8 THEN AS=LEFT$( A$,83 
810 IF BB$<"A" OR BB$>"X" THEN D1=0: 

RETURN 



Sane la ear r era al 

_ _I , _ m tat? 




MAS RAPIDO QUE EL DISCO 

BASE DE DATOS EN CASSETTE "JETBASE ' 
Para el COMMODORE 64 
ULTRARRAPIDA .FACIL MANEJO . GRAN CAPACIDAD 

Al fin el usuario del Commodore 64 con cassette, puede disponer 
de un programa exceptional que le permite el manejo de ficheros 
de forma sencilla, a la velocidad del lenguaje Maquina. 

Usted tardara jl minuto! en cargar el programa y posteriormente 
su uso le permite cargar o grabar un fichero que utilice la memoria 
completa del ordenador en [MENDS DE DOS MINUTOSL Esto su- 
pone, por ejemplo, 300 fichas de 5 campos de 27 caracteres por 
campo, en 60 vueltas de cinta cassette normal. Tambien podra cla- 
sificar u ordenar las fichas en un tiempo record. 




■ APUCACIONES COMERCIALES DEL MICRQQRDENADOR 
Apdo. de Corrects 29147 08080 Barcelona 



■ NOTA DE PEDIDD: 

Estimados Senores: 

Por la presente formulo el pedido del programa "JETBASE" al precio 

de 5000 ptas. mas gastos de envio. 

Agradezco me lo envien por el medio de transpose que selecciono: 

□ Correo 

□ Agencia . 

□ Qtros _ . „ 

La formq de pago que deseo es: 

□ Talon adjunto n VISA 

□ Contra reembolso □ MASTER CARD 

□ Con cargo a mi tarjeta de credito. □ DINERS CLUB 

Apellidos v nombre . 

N° de la Tarjeta Fecha Caducidad de la Tarjeta 

Importe total del pedido Telefono Fecha 

Firrna f como aparece en la tarjeta 
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LOS ME) ORES 

DE INPUT 
COMMODORE 

PUESTO TITULO PORCENTAJE 

1? Summer Games II 19,67% 

2° PistTopII It ,24% 

3. ° The Dambusters / 1,04 % 

4. ° Mision Imposible 10,04% 

5. ° Gijoe 9,83 % 

6. ° Sky Fox 9,23% 

7. ° Frankie goes to Hollywood 9,03 % 

8. ° Le Tour de France 7,63% 

9. ° The Way of exploding fist . 6,22 % 
10° Panorama para matar 6,07 % 



100% 

Para la confeccion de esta relacion unicamente se 
ban tenido en cuenta las votaciones enviadas por 
nuestros lectores de acuerdo con la seccion «Los 
Mejores de Input*. 

Noviembre de 1 985 



m mWk ■ ■ PROGRAMA DEL ANO 
I 1 m I EN INGLATERRA 




© DATABASE^ 
PUBLICATIONS 

1 PROCESADOR DE TEXTOS 

jldeal para escribir cartas e informes! 
Caractensticas: Visualization continua del 
tiempo • Contador de palabras (indicando 
las palabras por minuto) • Texto normal o 
doble, en pantalla o impresora. 

2 HOJA DE CALCULO 

jUtiliza tu micro para controlar tus cuentas! 
Caractensticas: Cifras visualizadas en filas 
y columnas * Actualizacion permanente • 
Actualizacion reflejada instantdneamente 
en toda la hoja • Grabacion de los 
resultados para futures modificaciones. 

3 graficos 

jConvierte esos numeros en maravillosos 
graficos! Caractensticas: Grdficos de barras 
en tres dimensiones • Graficos de pastel • 
Histogramas. 





BALANCE 



APELLIDCS: UEEOA CEBKLAN 
HU"BRE: GAR A 

DlKECCIONliC/ I SLA DE ARQSA 
DTKLCCI0N2: MADRID 
TELEFONO: 91 7215839 
EDAD; 19 



AF'ELLI DOS: MARIN QOMEl 
NOflBRE: JULIO 
DIRECCIOMUAVDA. t5E LA PAZ 1 
l>lRECCI0N2:LUeO 
TELEFONDi ^S 1 ? 965*78 
EDAD: 15 



flPELLIDOS; GUT IERRE2 MADRID 
None RE: JUAMA 
DIRECCION1 :C/ ALCALA 78 
D I REC^C I0N2 = SARCbLONA 
TELEFONOi 90 4S2282S 
EDAD; 21 



Registrp no. 

(QSi MQRAN DIAZ 



4 BASE DE DATOS 



jlgual que los archivos de la oficina! 
Caractensticas: Cargar ficheros con solo 
pulsar una tecla • Clasificacion • 
Modification • Listados * BOsqueda. 



*En Castellano 
*Servimos en 
48 Horas 





i 



EnvienosaMICRO BYTE 



B C D E F 



Q H I J K L H 



-rl P° Castellana, 179, 
I 



28046 MADRID ] 



Version disco AMSTRAD P.V.P. 3.900 




Nombre 



Apellidos 



Direccion 



Pobiacion 



D, P. 



Telefono 



WOW, 
£?4 



I 




r 

Deseo que me envienQ ejempiar/es 
del programa MINI OFFICE 

h PARA EL MICROORDENADOR 
| SENALADO 

□ AMSTRAD □ COMMODORE □ SPECTRUM 

□ AMSTRAD VERSION DfSCO 
Sin gastos de envio 

INCLUYO TALON NOMINATIVO □ 
CONTRA-REEMBOLSO □ 

Pedidos por telefono 

91 - 442 54 33/44 



JUEGOS DE INVIERNO 



No es preciso esperar a la llegada de 
las primeras nieves para practical los 
deportes de invierno. Este nuevo 
programa de Epix nos permite 
competir y practicar en una o varias 
de las distintas pruebas clasicas de 
las estaciones mas Mas. 
Igual que en Summer Games, existe 
una ceremonia de apcrtura y 
tenemos acceso a los registros de los 
records mundiales de las 
especialidades contenidas en el 
programa. 

Las opciones van eligiendose por 
mediation de menus y el movimiento 
del joystick. 

Podrfamos comenzar con los saltos 
de ski. Es posible controlar el 
momento del salto desde la rampa de 
lanzamiento. Igualmente, el control 
de la palanca nos permite mantener 
el equilibrio, despfazando el centro 
de gravedad. Es muy facil caer de 
bruces por inexperiencia. De 
cualquier modo, a la panoramica 
general se superpone una ventana 
por la que observar la posicion del 
saltador con mayor nivel de detalle. 




Una nueva rampa sirve para ejecutar 
esas diffciles y arriesgadas piruetas 
con skies, que se ven en las pelfculas 
de action con paisaje invernal. Es el 
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joystick nuevamente el que nos 
ayuda a controlar el centro de 
gravedad del deportista. 
Manejandolo con habilidad podcmos 
conscguir piruetas realmente 
sorprendentes. 

El patinaje sobre hielo ofrece tres 
modalidades. La primera cs de 




figuras. Sc pucdcn ejecutar siete 
movimientos diferentes, clegidos por 
la posicion del joystick, Desde el 
triple axel, al giro sentado, sin olvidar 
el doble salto lutz. Tambien es 
posible patinar de espalda. 
La scgunda modalidad es libre. Se 
pueden, combinar las figuras 
comentadas anteriormente, creando 
una corcografia propia, Pero, 
cuidado, aquf tambien es facil caer. 
Las dos primeras modalidades de 
ejecucion son realizadas por una 
bella patinadora, mientras que la 
tercera, el patinaje de velocidad es 
acometida por dos rudos 
patin adores. Cada uno dispone de 
una mitad de la pantalla, ocupando 
el centro de cada pista el competidor 
en cuestion y el otro aparece o 
desaparece segun la distancia que les 
scpare. La velocidad se incrcmcnta 
en la medida en que el ritmo seguido 
en el movimiento de la palanca se 
adecue al avance del patinador. 
Para concluir quedan dos 
especialidades poco difundidas en 
nuestro pais. Uno es el ski de fondo, 
en el que avanza el esquiador en 
solitario, ayudandose con los 
bastones (nuevamente el ritmo de 
movimiento del joystick juega un 
papel fundamental) por tres bonitos 
paisajes nevados. 

Las carreras de bobsled ponen punto 
final al numero de competiciones. 



MEMORIA: 64 


INTERES: 4 sobre 5 


CLASE DE PROGRAMA: Competicion 


RE AL,SMO:4.5sobr 


e 5 
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Son esos coches tipo cajoo que se deslizan por un 
semitubo de hielo y nieve, alcanzando velocidades de 
vertigo. Es precise controlar hacia donde se desplaza el 
peso en las curvas. Si no se hace correctamente, cl 
vuclco esta practicamcnte asegurado. Nada sc puede 
decir contra la calidad de los graficos y el nivel de 
realismo de estas pruebas. Winter Games es un programa 
sencillamente excepcional. 

★★★★★★★★★★★★★★★★★★★★★ 

EL NAVEGANTE 
ESPACIAL 

Eres el Comandante Jameson y estas al mando de la nave 
Cobra MK III, apt a para el comcrcio y el combate. 
En ella via] as por el espacio comprando, vendiendo y 
.ransportando toda clase de mercancfas. Existe una tabla, 
que aparece en la pantalla, dc los productos que puedes 
comprar, cantidades y precio unitario. Aquf tienes desde 
platino, maquinaria y textiles hasta armas de fuego o 
rneles. 

En los dos mil planetas, repartidos entre ocho galaxias, 
ay de todo, incluso piratas no definidos como 
:riminales, aunque si como comerciantes fracasados que 
:rataran de arrebatarte la carga. 

Es importantc conocer el perfil de cad a planeta antes de 
;omerciar con el, en algunos reina de anarqufa. 
igualmente existen mundos agncolas y mundos 
ndustriales. Es preciso tener todo esto en cuenta, antes 
Je tomar una decision. El agricola demostrara gran 
ividez por las mercanrias industriales, mientras que el 
industrial precisara comida. 

La pantalla de mando es tremendamente completa. En 
:ondiciones normales consigues una vista frontal, aunque 
puedes conseguir las vistas izquierda, derecha y posterior 
para avcriguar a que, o quienes se aproximan a la nave. 
En la franja inferior de la pantalla se han dispuesto los 
paneles de los instrumentos de vigilancia y medida. En la 
izquierda vemos el termometro que registra la 
temperatura interior de la cabina, 

El altimetro entra en funcionamiento cuando orbitamos 
en torno a un planeta, y el velocimetro es de importancia 
crucial para las maniobras de acercamiento, entrada en 
orbita o el atraque para cargar o descargar mercancfas. 
El giroscopo nos indica nuestra posicion relativa, si la 
nave pica o se inclina a la izquierda o derecha. El nivel 
de combustible y la brujula tambien est an presentes. 
La parte central esta ocupada por el valioso scanner. 
Produce una vision tridimensional del entorno de la 
nave, pudiendo localizar y determinar la posicion de 
cualquier nave que se nos aproxime. 
Para orientarnos en el espacio, disponemos de una carta 
Je navegacion galactica, que puede visualizarse para 
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ayudarnos a Iocalizar los mundos 
favorables a nuestro comer cio. 
Las naves espaciales que iras 
encontrando son dibujadas en forma 



de lmeas esquematicas, que no le 
restan emotion al juego y, sin 
embargo, le producen una buena 
sensation tridimensional. Existen 



DATOS GENERALES 


CALIFICACION 


TITULO: Elite 


GRAFICOS: 4 sobre 5 


FABRICANTE: Firebird 


COLOR: 3 sobre 5 


ORDENADOR: Commodore 


PRESENTACION: 4,5 sobre 5 


MEMORIA: 64 


INTERES: 4 sobre 5 


CLASE DE PROGRAMA: 
Aventura espacial 


REALISMO: 4 sobre 5 







unas dieciocho de ellas, teniendo 
cada cual una fisonorma muy 
caracteristica. 

EI juego no es facil de dominar en 
las primeras elapas, pero es 
elevadamente absorvente para quien 
se enfrente a el. Es condition 
necesaria leerse el manual de 
instrucciones, en ingles, pero no de 
diffcil comprcnsion dado su 
nivel dc description detallada de 
todos los aspectos precisos, para 
dominar el comercio 
intergalactico, 

Una corta novela, nos proporciona 
un breve esbozo de como es 
la vida de estos camioneros 
espaciales . 



PERDIDO EN EL GRAN ALMACEN 



El pequeno Herbert se ha perdido. 
Se entretuvo mirando los juguetes y 
cuando se quiso dar cuenta sus 
padres ya no estaban a su lado. 
Ayudale a encontrar a sus padres 
que le aguardan en el departamento 
de objetos perdidos con una bolsa 
repleta de golosinas. 
La resolucion grafica, el colorido y el 
movimiento del personaje son tres de 
las caracteristicas mas destacadas de 
este excelente juego creado por 
Mikro-Gen, que ademas tiene todas 
sus indicaciones en castellano. 
Herbert se encuentra solo en unos 
grandes almacenes que semejan un 
gran caseron con grandes salas que 
debera atravesar hasta volver a 
encontrar a sus padres. Partiendo de 
la sala de jueguetes el pequeno inicia 
su recorrido teniendo que evitar los 





muchos peligros que en cada 
habitacion le acechan. A medida que 
va avanzando surgen ante el una 
serie de objetos como Haves, 
linternas, transi stores, camaras 
fotograficas, etc. que debes 
seleccionar, ya que solo puede 
Uevar dos de estos objetos encima. 
Estos pueden ser muy utiles en 



determinados momentos, por lo que 
es conveniente elegirlos 
adecuad amen te . 

La pantalla muestra la sala en la que 
te encuentras y en la parte superior 
indica las vidas que te quedan, los 
objetos que lleva encima y el 
tiempo transcurrido. Para encontrar 
a sus padres Herbert debera 
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atravesar el invernadero, La sala de 
musica, el guardarropa, el 
dormitorio, la biblioteca, la sala de 
deportes, el salon principal y otras 
muchas habitaciones. Tu puntuacion 
vendra definidia por el numero de 
golosinas que hay as recogido, asi 
:omo el tiempo que hayas 
:onseguido permanecer, ariadiendote 
un calificativo por no haber 
conseguido tu objetivo. 




DATOS GENERALES 


CALIFICACION 


TITULO: Herbert's 


GRAFICOS: 5 sobre 5 


FABRIC ANTE: Mikro-Gen 


COLOR: 5 sobre 5 


ORDENADOR: Commodore 


PRESENTACION: 4,5 sobre 5 


MEMORIA: 64 


INTERES: 4 sobre 5 


CLASE DE PROGRAMA: 




REALISMO: 4 sobre 5 


Odisea infantil 







El consejo que te podemos dar es 
que evites el contacto con cualquier 
objeto que se mueva y aunque 
localices la salida permanece en el 
edificio, en la calle cae un fuerte 
chaparron que puede acabar con tus 
energfas. 

Portate como un buen amigo y ayuda 
a Herbert a encontrar a sus padres, 
seguro que el te lo agradecera y tu 
disfrutaras con unas magmficas 
pantallas. 



KARATE 

HI tenia principal de este juego tiene 
:,)mo fondo una tragcdia oriental, 
:onde el villano es el causante de 
:odos los males y el bueno trata de 

desfacer los entuertos». 
El «chico» regresa contento a su casa 
eras haber pasado largos anos 
.iprendiendo y perfeccionandose cn 
el antiguo y noble arte marcial que 
Ueva por nombre karate. Su contento 
acaba pronto pues encuentra su 
aldea quemada y arrasada, su familia 
Jispersada y, lo mas importante, su 
prometida ha sido raptada por 
Akuma, el todo poderoso senor de 
:urno de la zona. 
Ahora tu tomas el protagonismo: 
debes escalar el acantilado y 
derrotar a los guardias, hasta 
enfrentarte mano a mano con 
Akuma, solo asf puedes rescatar a la 
princesa Mariko. Para ello no 
cuentas mas que con tu valor, tus 
:onocimientos de karate y... un 

oy stick. 

Tienes una seria limitacion: no 





puedes dar mas que un numero 
limitado de golpes, indicado en cada 
momento por una lmea de triangulos 



que aparccen en la base de la 
pantalla, desapareciendo uno por 
golpe. 







n 








TITULO: Karateka 


GRAFICOS: 5 sobre 5 


FABRICANTE: Broderdbund 


COLOR: 4,5 sobre 5 




ORDENADOR: Commodore 


PRESENTACION: 4,5 sobre 5 


MEMORIA: 64 


INTERES: 4 sobre 5 


CLASE DE PROGRAMA: 


REALISMO: 5 sobre 5 




Artes marciales 
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enemigo tambien golpea y, por tanto 
tendras que esquivar sus ataques. 
El control se puede realizar tambien 
por teclado, pcro resulta 
notablemente mas incomodo. 



Puedes dar tanto patadas como 
punetazos en tres areas del enemigo; 
arriba, abajo y en el centre. Si 
calculas correctamente la distancia, 
cada golpe tendra exito, pero el 



A juzgar por expertos en karate que 
han visto el desarrollo del juego, los 
movimientos son absolutamcnte 
realist as, de eso no cabe la menor 
duda. 



EL AJEDREZ MITOLOGICO 



Una de las diferencias mas 
importantes que se aprccian con 
respecto al ajedrez es que si bien en 
este una pieza come a la otra de un 
modo directo, en el Archon la cosa 
no es tan sencilla. Las piczas se 
desafian entre si Los jugadores 
eligen las piezas que se han de 
enfrentar y el tablero desaparece, 
siendo sustituido por un campo de 
batalla. Es aqm donde luchan con 
fiereza, utilizando todos sus recursos, 
los unicornios, valkirias, basOiscos, 
hechiceros, etc. La habilidad de los 
jugadores cuenta para neutralizar o 
destruir al adversario. 
Los personajes tienen limitaciones. 
Algunos no pueden desplazarse mas 
que un numero determinado de 
casillas. Otros no pueden sobrevolar 
a otras piezas, por estar condenados 
a moverse solo por tierra. 
El color de las casillas se 
altera durante el transcurso del 
juego , beneficiando a la pieza que lo 
ocupa, proporcionandole mayores 
recursos y defensas para defenderse 
y atacar al enemigo. 
El objetivo final consiste en ocupar 
cinco casillas estrategicas, llamadas 
«puntos de poder». Quien antes lo 
consiga, sera el ganador. La otra 
manera de ganar consiste en 
deshacerte de todas las piezas del 
contrincante. 





ARCHON 
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Este ajedrez es algo mas que un 
juego, en el que las capacidades 
estrategicas de los participantes 
cuentan mas de lo que pueda 
parecer. Igual que ocurre con 
el ajedrez normal, se pueden lograr 
distintos grados de maestria. 
Cabe resaltar la enorme gracia con lo 
que evolucionan las figuras por el 
campo de batalla. 



nRCHON 
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DATOS GENERALES 


CALIFICACION 


TITULO: Archon 


GRAFICOS: 4,5 sobre 5 


FABRICANTE: Ariola soft 


COLOR: 3,5 sobre 5 


ORDENADOR: Commodore 


PRESENTACION: 5 sobre 5 


MEMORfA: 64 


INTERES: 5 sobre 5 


CLASE DE PROGRAMA: Estrategia 


REALISMO: 4 sobre 5 
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OGRO 



Una creacion de Electronic Arts producida y presentada per 
DRO SOFT con instrucciones y pantallas 
en CASTELLANO. 



FENIX 




DRAGON 




TROLL 




BASILISCO 




BRUJA 






UNICORN 



ft 



ARQUER 




MAGO 



ft 



CABALLE 




En la epoca actual, 
estamos viviendo el 
resurgimiento del 
genera de la fantasia 
y la aventura, dentro 
de esta corriente, JON 
FREEMAN, el principal 
creador de este juego 
elaboro un ajedrez 
jantdstico cuyos personajes 
podian estar sacados de 
cualquier aventura de 
mazmorras y dragones 
(DUNGEONS AND 
DRAGONS). 





DRO SOFT 



'Mil, * Ninguna 

Archon. 

ARCHON presenta la eterna 
lucha entre la luz y la oscuridad, en 
un con lex to de accion y estrategia 
entre fuerzas opuestas sacadas del 
mito y la leyenda. El lado de la luz 
y el lado oscuro son iguales en 
numeros y equivalentes en fuerza, 
pero no idemicos, su objetivo sin 
embargo es el mismo, conquistar 
I os cinco puntos de poder o 
eliminar a la f accion opuesta. 
Las diferentes criaturas fantasticas 
bajo control de los jugadores forman 
18 por bando de 8 clases diferentes. 

ARCHON 



DRO SOFT, Funriadom, 3. Madrid 28028 



Ninguna de las suyas son iguales a 
las de su oponente. 

Archon se juega en dos 
pantallas. En una (la 
estrategica) los jugadores 
alteman turno moviendo 
sus piezas a posiciones favorables. 
Cuando se coloca una pieza en un 
cuadro ocupado por una pieza 
enemiga, el juego pasa temporal men te 
a la segunda presentation, la arena 
de combate. En un clasico juego de 
tablero, el defensor es barrido de su 
casilla sin mayor discusion. En 
Archon no se admiten tranquilidades 
de ese tipo; si alguien quiere algo 
tiene que luchar por ello. Cuando 
intente entrar en un cuadro ocupado 
por el enemigo lo vera: el cuadro en 
disputa se expande hasta llenar la 
pantalla... entonces en palabras de 
cierto monstruo de piel naranja del 
comic jES LA HORA DE LOS 
MAMPORROS! 




ELECTRONIC ARTS 
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INTELIGENCIA 
ARTIFICIAL: 

CONCEPTOS Y 
PROG RAM AS 



Autor: Tim Hartnell 
Editor: Anaya 
Paginas: 267 
Precio: N.D. 

Un tema tan manido en los 
ultimos tiempos como la inteli- 
gencia artificial y los sistemas 
expertos da pie a que muchos 
sean quienes especulen y cuen- 
ten sus «batallitas»; pero pocos 
ofrecen una vision tan real y di- 
recta como la hallada en esta 
obra. Sn contenido es poliva- 
lente para distintos ordenado- 
res, pues las sentencias PRINT 
estan a la orden del dia y no 
existen complicaciones con 
pantallas graficas. Por otro 
lado, el autor ha utilizado un 
BASIC «neutro», reconocible 
por gran numero de ordenado- 
res. 

Aparte de los programas, las 
anecdotas y libres interpreta- 
ciones hacen que la lectura sea 
realmente disfrutada. 

Un hecho se viene a demos- 
trar aqui, la inteligencia artifi- 
cial no se encuentra tan distan- 
te de la mano de un program a- 
dor medio. Es mas, los progra- 
mas y rutinas que aparecen 
pueden servir como punto de 
partida para crear programas 
mas especificos para aplicacio- 
nes determinadas. 

La inteligencia artificial 
aborda aplicaciones tan diver- 
sas como la utilization en el 
juego de las tres en ray a, ha- 
ciendo que el programa apren- 
da que estrategias conducen a 
la derrota y la victoria, convir- 



ticndo al ordenador en un com- 
petidor virtualmente invenci- 

La comprensidn del lengua- 
je natural y la traduction auto- 
matica proporcionan material 
de base para invcstigar los me- 
canismos que permiten la co- 
municacidn entre los seres vi- 
vos. 

El famoso programa que 
hizo alguna vez pensar en la 
posibilidad de que el psiquiatra 
podria ser sustituido por un or- 
denador, para tratar determi- 
nado tipo de desequilibrios 
me n tales, tiene su replica en 
estas paginas, si bien se trata 
de una version simplificada. 

Los sistemas expertos, capa- 
ces de aprender en base a ra- 
zonamientos logicos y los cono- 
cimientos previamente acumu- 
lados, ocupan otra buena par- 
te de la extension del libro. 

Cabe destacar que uno de los 
mayo res alicientes que se en- 
cue nt ran en la lectura de los di- 
fe rentes capitulos, es la meticu- 
losidad con que se explican las 
rutinas que componen los pro- 
gramas, de tal forma que siem- 
pre es posible saber que esta- 
mos queriendo conseguir a me- 
dida que tecieamos. 

En resumen, inteligencia ar- 
tificial: conceptos y programas, 
es una obra didaetica y eminen- 
temente practica. 



LENGUAJE WIAQUINA 
DEL COMMODORE 64 



Autor: Ian Sinclair 
Editor: Gustavo Gili 
Paginas: 159 
Precio: N.D- 

Algunos piensan que es pri- 
me de sir Clive, el del Spec- 
trum, pero el asegura que no 
es asi. Este conocido autor, 
con gran experiencia acumula 
da en la preparation de libros 
inforrnaticos de fatil compren- 
sidn, vuelve a la carga para in- 
tentar quitarle gravedad al 
aprendizaje del eddigo maqui- 
na. 

Especialmente indicado para 
cuantos quieren dar sus prime- 
ros pasos en la comunicacion 
directa con el microprocesador 
del Commodore 64 sin compli- 
carse la vida. 

Explica las notaciones bina- 
ria y hexadecimal y su conver- 



sion mutua por medio de pro- 
gramas en BASIC. 

Los numeros negativos y su 
manejo en los ordenadores 
quedan ciaramente expuestos, 
aunque con brevedad. Este 
tema que es tan importante a 
la hora de program ar en codi- 
go maquina, suele quedar rele- 
gado en la mayoria de libros 
que abordan esta clase de pro- 
gramacidn. 

Una vez explicados los mo- 
dos de direccionamiento y el 
papel que juegan los registros 
y el aeumulador, Sinclair nos 
ofrece una serie de ejemplos 



LENGUAJE 
MAQUINA DEL 
COMMODORE 64 




practicos en forma de rutinas 
cortas, que pueden ser llevadas 
a la practica utilizando carga- 
dores desde BASIC, emplean- 
do POKE, READ, DATA y el 
correspondiente bucle FOR . . . 
NEXT. 

Si despues de realizar los 
ejemplos, sigues convencido de 
que esto es lo tuyo, Sinclair 
continua describiendo un en- 
samblador, que facilita la tarea 
de programar en codigo maqui- 
na. La version descrita se lla- 
ma Mikro, pero no difiere mu- 
cho de otros ensambladores co- 
mer ci ales. 

El libro concluye con dos 
ejemplos. El primero nos 
muestra una rutina sonora, que 
produce un tono al pulsar una 
tecla. El segundo es un renu- 
merador de programas escritos 
en BASIC. 

Este libro constituye una 
buena herramienta para la ini- 
tiation al aprendizaje del eddi- 
go maquina. 



18 JUEGOS DINAMICOS 
PARA TU 
COMMODORE 64 



Autor: P. Monsaut 
Editor: Noray 
Paginas: 95 
Precio: 650 

La mejor forma de aprender 
a programar parece ser que es 
programando. Pero resuita te- 
dioso y complicado ser autodi- 
dacta. Es aquf donde toman 
protagonismo libros como este. 
Con titulos tales como Slalom, 
Atcrrizaje, La caza del pato, 
Cangrejos, Gran Premio, Tan- 
que, etc., anima a los mcnos 
experimentados a iniciarse en 
base a programas relativamen- 
te breves, pero no por ello ca- 
re ntes de atractivo, como pudi- 
mos comprobar tecleandolos. 

Los programas son una re- 
production directa, al tamano 
real, de la impresion matricial 
clasica, pero bastante cuidada. 

Cabe resaltar que se ha hui- 
do de los ( caracteres graficos de 
control diferido desde progra- 
ma, para facilitar la tarea de 
copia, incluso los espacios en 
bianco aparecen indicados en 
numero entre corchetes. 




PflRATU 



EDITORIAL MKU! 



Para completar su fin, hubie- 
ra sido deseable que las distin- 
tas rutinas hubieran sido expli- 
cadas, aunque tal vez se pre- 
tenda que sea el propio lector 
quien los vaya destifrando a 
medida que avanza, pues bien 
es cierto que con un poco de in- 
teres y algun libro de referen- 
cia se terminan comprendiendo 
sin gran dificultad. 
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QMMODORE 64, 
3 . V. P.: 2.300 ptas. 



La ultima locura de USA es el Break y no 
debe perderselo. Ahora cualquiera puede bailar 
el Break. Solo coja su joystick y controle a su 
bailarin de Break saltando (poping= hacer sal- 
tar como un tapon de champan), paseando 
como en la luna, estirandose y retorciendose... 
todo en su pantalla de computador. 
Breakdance, el juego, incluye un juego de ac- 
cion en el que su bailarin trata de ganar a una 
pandilla de Breakers, un juego «como el Si- 
mon", donde su bailarin tiene que d up Hear los 
pasos del bailarin manipulado por el compu- 
tador y la parte de baile libre donde usted 
desarroila sus propias rutinas y el computador 
las realiza despues para que las vea. Hay iam- 
bic n un juego que 1c desafia a que real ice la 



secuencia correcta de pasos para realizar un 
headspin (giro con Cabeza) el suicidio u otros 
movimientos sin caerse. 

jAprenda a bailar el Breakdance hoy! jEpyx 
Jo hace facil! 

Uno a dos jugadores; control Joystick, 
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EIGHT NEW WAYSTO GO FOR THE GOLD, 



AEDYX 
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Strategy Games for the Action-Game Player 




COMMODORE 64, 
P, V. P.: 2.300 ptas. 



Seguro que Summer Games fue genial, 
pero ipot que pa rarse ahi'? Deje que Summer 
Games II le lleve incluso mas lejos con ocho 
nuevas competiciones. jncluido: ciclismo, es- 
grima. kayaks, triple salto, remo, salto de al- 
tura. javalina e incluso equitacion. Todos 
ellos pueden jugarse hasta con ocho jugado- 
res y algunos como ciclismo, remo y esgrima 
le reran con una competicion realista codo-a- 
codo. 

Primero, decida cual de los 18 paises dife- 
rentes va a representar. Despues, como en 
una verdadera competicion olimpica, necesi- 
tara su propia estrategia y agilidad mental, 
no solo velocidad y agilidad para superar 
cada prueba. Es tan realista, que hay incluso 
ceremonia de apertura y de cierre con presen- 
tation de medallas despues de cada compe- 
ticion. 



No es demasiado pronto para prepa rarse 
para 1988. Con la dicta oportuna, adeeuado 
entrenamiento y horas de practica, usted 
puede hacerlo, Mientras tanto, pongase su 
chandal. agarre su joystick y deje que Summer 
Ciames II le indique ocho nuevas form as de 
conseguir la medalla de ore 

Hasta ocho jugadores, control joystick. 
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